Thema: Delphi Timages löschen.

Einzelnen Beitrag anzeigen

Benutzerbild von freak4fun
freak4fun

Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#4

Re: Timages löschen.

  Alt 18. Jul 2005, 13:51
Hallo ,
kannst du vielleicht mal posten, wie du deine bilder erstellst?

Delphi-Quellcode:
Bild: Array[0..10] of TImage;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  Image1.Free;
  for i := 0 to 10 do
    Bild[i].Free;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  i: Integer;
begin
  for i := 0 to 10 do
    begin
      Bild[i] := TImage.Create(Form1);
      Bild[i].Parent := Form1;
      Bild[i].Left := i*50;
      Bild[i].Top := 10;
      Bild[i].Picture := Image1.Picture;
    end;
end;
MfG
freak
Christian
IT: Schließen Sie bitte das Fenster. User: Die Tür auch?
i++; // zaehler i um 1 erhoehen
  Mit Zitat antworten Zitat