öhm ich hab mir jetzt nicht alles durchgelesen, was die anderen so geschrieben haben, aber auf die schnelle würde ich es so machen:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
VAR
path : STRING;
begin
repeat
path := extractfilepath(application.ExeName)+'Karten\'+inttostr(random(38)+11)+'.bmp';
until fileexists(path);
image2.Picture.LoadFromFile(path);
end;
Vorher solltest Du noch den Zufallsgenerator per randomize; initialisieren.
Also z.B. im onCreate Event, oder so. (so meinte zumindest immer mein Großvater)
gruß
Evian
EDIT:
oder hier noch mal als Einzeiler ohne Schleife:
image2.Picture.LoadFromFile(extractfilepath(application.ExeName)+'Karten\'+inttostr(random(4)+1)+inttostr(random(8)+1)+'.bmp');