Q'n'D-Lösung:
Delphi-Quellcode:
var
bild: TImage;
x: integer;
begin
x:=random(52)+1;
bild := FindComponent('image' + inttostr(x));
bild.visible:=true;
bild.top:=200;
bild.left:=300;
end;
Saubere Lösung: Bei Programmstart alle Bilder in ein Array packen und dann darüber ansprechen. Idealerweise kannst du die TImage-Komponenten auch zur Laufzeit erzeugen, aber ich weiß nicht ob du das schon kannst...