|
Registriert seit: 10. Sep 2003
Ort: Großhennersdorf
532 Beiträge
Delphi 10.1 Berlin Professional
|
Re: Karten geben
29. Okt 2009, 12:24
Oder:
Alle Karten in einer Liste halten (TList, TStringList) und dann per idx:=random(List.Count-1) eine Karte ziehen und diese nach dem ziehen aus der Liste löschen List.Delete(idx).
Gruß
Marco
|