Wah nein, das ist das Stichwort für "wie mache ich es nicht?"!
Delphi-Quellcode:
for k:=1 to 30 do
begin
bildarray[k]:=Image[k].left;
end;
Was heißt da das geht so nicht? nix da!
Einmal ins formcreate reingepackt:
Delphi-Quellcode:
SetLength(Images,5);
Images[0] := Image1;
Images[1] := Image2;
Images[2] := Image3;
Images[3] := Image4;
Images[4] := Image5;
Und schon kann man durch seine Images durchiterieren wie man will.
FindComponent mach ich erst, wenns über 100 Images sind - die werden dann aber eh dynamisch erzeugt und das Problem stellt sich erst gar nicht, weil sie dann gleich ins Array kommen!
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1