Quellcode reduzieren

[Mystery]

So..

hab das jetzt mal versucht das in meinem Fall anzuwenden, leider ohne erfolg.

habe eine variable x:integer;

x:=random(52)+1;

und jetzt kommen meine ganzen 52 Fälle..

if x=1 then begin image1.visible:=true; image1.top:=200; image1.left:=300; end;
if x=2 then begin image2.visible:=true; image2.top:=200; image2.left:=300; end;
if x=3 then begin image3.visible:=true; image3.top:=200; image3.left:=300; end;

//bei dem Programm werden sie nicht nur sichtbar und verschoben, ist nur ein Beispiel...

gibt es eine Möglichkeit, die images mit x irgendwie anzusprechen

Zum Beispiel sowas wie:

image(x).visible:=true oder sowas?!