Forum: Object-Pascal / Delphi-Language
Delphi
by Jürgen Thomas,
26. Aug 2006
@Marco2,
ich bin davon ausgegangen, dass Du zunächst nur alle Karten registrieren wolltest, aber die Trumpf-Reihenfolge hier noch keine Rolle spielen sollte; anschließend würden die Karten ja sowieso gemischt werden. Aber wenn Du das anders steuerst, spielt die Reihenfolge bei der Initialisierung natürlich eine Rolle. (Auch das wäre mit Schleifen möglich, aber dann ist die Verschachtelung...
Forum: Object-Pascal / Delphi-Language
Delphi
by Jürgen Thomas,
26. Aug 2006
Hallo Marco,
an dieser Stelle wiederholen sich bei einer konstanten Deklarierung viele Begriffe (Farben und Werte) ständig. Ich würde deshalb sowieso vorschlagen, die Initialisierung zur Laufzeit durch eine Prozedur in drei verschachtelten Schleifen zu erledigen:
var x1, x2, i1: integer;
// die ersten 24 Karten registrieren
for x1 := Low(TKartenfarbe) to High(TKartenfarbe) do
begin
for...