Forum: Programmieren allgemein
by Luckie,
10. Aug 2007
Und was hat das mit einem zwei dimensionalen Array zu tun?
procedure TMemoryField.IniTMemoryField;
var
i : Integer;
Card : TCard;
begin
for i := 0 to FCountCards - 1 do
begin
Card := TCard.Create(nil);
Card.Parent := FParent;
Forum: Programmieren allgemein
by Luckie,
10. Aug 2007
Ich konnte nicht schlafen. ;)
Im Anhang mein Memory. Eigentlich ist es nur eine Memory-Klasse mit einer Demo-Anwendung. Man müsste noch an zwei Punkten etwas verbesser: Die Anordnung der Felder, die sind in einer Reihe im Moment und an der Zuweisung der Werte, obwohl das ist egal, nur eben die Beschriftung der Felder sollte man noch mal etwas verschönern. ;) Ansonsten kommt man mit 200...