Thema: Delphi Timages löschen.

Einzelnen Beitrag anzeigen

Benutzerbild von sniper_w
sniper_w

Registriert seit: 12. Dez 2004
Ort: Wien, Österriech
893 Beiträge
 
Delphi 6 Enterprise
 
#8

Re: Timages löschen.

  Alt 18. Jul 2005, 15:06
Also bei mir geht es wunderbaer. Ein Beispiel:
Delphi-Quellcode:
var
  Form1: TForm1;
  img:TImage;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
 if Assigned(img) then
   FreeAndNil(img)
   else
   begin
     img := TImage.Create(nil);
     with img do
     begin
       Visible := False;
       Parent := Self;
       Picture.LoadFromFile('c:\test1.bmp');
       AutoSize := True;
       Top := 100;
       Left := 100;
       Visible := true;
     end;
   end;
end;
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
  Mit Zitat antworten Zitat