noch eine weitere frage
Ich habe von TImage 27 Objekte und das
Delphi-Quellcode:
for counter := 0 to 2 do
begin
case saferend[counter] of
0: Image1.Picture.Assign(Caller[0]);
1: Image1.Picture.Assign(Caller[1]);
2: Image1.Picture.Assign(Caller[2]);
3: Image1.Picture.Assign(Caller[3]);
4: Image1.Picture.Assign(Caller[4]);
5: Image1.Picture.Assign(Caller[5]);
6: Image1.Picture.Assign(Caller[6]);
7: Image1.Picture.Assign(Caller[7]);
8: Image1.Picture.Assign(Caller[8]);
9: Image1.Picture.Assign(Caller[9]);
else
end;
so aufzuschreiben 27 mal scheint mir doch sehr unelegant
gäbe es eine möglichkeit alle 27 objekte per forschleife oder ähnliches aufzurufen?