Kartenspiel

[Stillmatic]

Guten Abend!!!

Ich möchte ein Kartenspiel namens "Schlesische Lotterie" programmieren!

Ich muss auf einen Buttonklick so reagieren......
Er werden neun zufallsKarten(von einem Skat Kartenspiel) gezogen nach denen nachher die Punkteverteilung berechnet wird!
Nun ist mein Problem folgendes!!!

Ich habe einen array vom Typ TCards( also K7(Karo 7 ),H7(Herz 7) usw...)
Karten : array[0..8] of TCards;

Eine zufallsKarte generiert man so....
Karten[i]:= TCards(random(UConst.cCardCount));

Wenn ich jetzt mit einer for Schleife den Array mit Zufallskarten fülle, werden möglicherweise Karten doppelt in den array geschrieben, was aber nicht sein darf!!!

Wie kann ich das Problem lösen???

Meine Idee war es eventuell, einen KomplettenKartenstapel zu deklarieren und jede Karte aus dem Stapel zu entfernen die generiert wurde und dann zu überprüfen ob die Karte noch im Stapel vorhanden ist, dann erst die Karte in den Array schreiben!!--Aber das klappt net wirklich...