Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#4

Re: Images mehrfach verwenden

  Alt 17. Dez 2006, 19:38
Hallo,

so würds gehen:
Delphi-Quellcode:
for i:=0 to 50 do
   begin
     ImSchuesse[i] := TImage.create(self);
     
     with ImSchuesse[i] do
       begin
         Picture.Graphic.Assign(Strich.Graphic);
         Parent := Form1; //oder welcher Parent auch immer!
       end;
   end;
  Anzahl:=1;
Und nicht vergessen, die Images im OnDestroy der Form wieder freizugeben

[Edit]
Immer das zu schnelle schreiben! Code bei Assign richtig gestellt.
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat