HILFE !!! Wie kann man bilder zufällig anzeigen lassen?

[jesus.or.christ]

hier eine function von mir

Delphi-Quellcode:

function Mischen(kartenliste: TStringlist):TStringlist;
var l:integer;
begin
  randomize;
  result:=tstringlist.Create;
while kartenliste.count>0 do
  begin
    l:=random(kartenliste.Count);
    result.Add(kartenliste[l]);
    kartenliste.delete(l);
  end;
end;

der vorteil von dieser methode: jede karte wird nur einmal aufgerufen, was bei einem reinen zufallsgenerator auswurf nicht der fall ist

der parameter kartenliste is eine tstringlist, in der die karten in ungemischter reihenfolge drin sind

z.B.: 01Herz für Herz Ass
02Herz für Herz Zwei
...
ausgegeben wird eine tstringlist mit gemischter reihenfolge
nun einfach eine karte aufrufen

z.B. so:
image1.picture.bitmap.loadfromfile(gemischteStringlist[1]+'.bmp');