mehrere Image schliesen

[andreas2004]

Hallo,

ich versuch gerade eine Procedure zu erstellen welche mir beim aufruf
mehrere Images von visible true auf visible false setzen soll.

nur sagt mir das Prg das der Bezeichner nicht gefunden wird

Code:

procedure tform1.alle_schliesen;

begin
zaehler := 1;
repeat
zaehler2 := InttoStr (zaehler);
bild := 'image'+zaehler2;
bild.visible := false;
zaehler := zaehler+1;
label1.caption := bild;
until zaehler = 10;

end;

Das Problem ist die Zeile
"bild.visible := false; "
die variable "bild" wird wird im Label angezeigt als "image1...image9"
aber irgendwie nicht als
zb.
"image1.visible := false;"
interpretiert

Variabl Bild ist von Typ eine String variable

weis hier jemand wo es drann hängt