Variable mit Variable

[DeddyH]

Quick and Dirty:

Delphi-Quellcode:

var
  i: integer;
  img: TImage;
begin
  for i := 1 to 12 do
    begin
      img := FindComponent('Image' + IntToStr(i));
      if Assigned(img) then
        //mach was mit dem Image
    end;
end;

Sauberer wäre es aber IMO, ein eigenes Array oder eine Liste zu deklarieren und einmalig mit den Images zu befüllen. Dann kannst Du die Images auch umbenennen.

[edit] *Pfh*, wozu tipp ich eigentlich? [/edit]