Código Delphi [-] procedure LiberaImage(Image:TImage); begin Image.Picture:=nil Image.Repaint; end;
procedure LiberaImage(Image:TImage); begin Image.Picture:=nil Image.Repaint; end;