Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.275 Beiträge
 
Delphi 12 Athens
 
#8

AW: Inkompatible Typen

  Alt 20. Aug 2020, 07:02
Moin...

Diese Logic verstehe ich nicht...
Delphi-Quellcode:
a:=random(length(blatt)); // ermittlung der Karte aus dem Blatt (Integer zwischen 0 und 109)

inc(zz); // Anzahl der Karten
until ((a > 30) and (a < 90)); // Abheben min. 30 max. 90 Karten von 109 // ??? müßte das nicht statt a zz heißen

setlength(tb,a);// ??? müßte das nicht statt a zz heißen
Wie ist eigentlich dein Kenntnisstand bei Delphi?

Ich würde 2 Listen benutzen (TObjectList<TCard>). Die erste Liste mit dem gesamten Blatt füllen. Von der ersten Liste die gezogenen Karten in die andere Liste verschieben...
  Mit Zitat antworten Zitat