Wie erstelle ich mehrere TImages auf einmal ?

[thomas2009]

Hi
Ich möchte mehrere TImages at run time erstellen

Delphi-Quellcode:

begin
with.TImage.Create(Self) do begin
width:=100;
Height:=100;
Top:=10;
Left:= ?
parent:=ScrollBox1;
...

end;

[Sir Rufo]

Ja, so geht das ... wo ist jetzt die Frage?

[thomas2009]

Die Frage ist 10 images erstellen und nicht eine

[Sir Rufo]

Delphi-Quellcode:

for idx := 1 to 10 do
with.TImage.Create(Self) do begin
width:=100;
Height:=100;
Top:=10;
Left:= ?
parent:=ScrollBox1;
...

end;

[nuclearping]

Taktaky? :pale:

[ConstantGardener]

@nuclearping: You make my day! :-D

[DeddyH]

Zitat:

Zitat von Sir Rufo (Beitrag 1088878)

Delphi-Quellcode:

for idx := 1 to 10 do
with.TImage.Create(Self) do begin

Wenn man den Punkt hinter dem with weglässt, sollte es funktionieren (ich weiß, C&P-Fehler :zwinker:).

Zitat:

Zitat von nuclearping (Beitrag 1088881)

Taktaky? :pale:

Ich dachte schon, ich sei der Einzige, der sich diese Frage stellt. :mrgreen:

[pustekuchen]

Du kannst dann zum Beispiel auch ein array of TImage machen und dann das Array mit deinen Images füllen.

btw: Taktaky?

[DeddyH]

Oder eine TObjectList/TComponentList, wobei man da aufpassen muss, wer für den Speicher verantwortlich sein soll.

@pustekuchen: Gib den Namen einfach mal bei Google ein ;)

[wicht]

Zitat:

Gib den Namen einfach mal bei Google ein

Mir hat die Forumssuche hier mehr geholfen :-D