Also für meinen Geschmack steckt in dem Code viel zu wenig Objektorientierung (nämlich gar keine).
Dabei kann man in einem Kartenspiel so viele Objekte entdecken:
* Die Karte
* Der Spieler
* Der Spieltisch
* Die Kartenliste
* Die Spielerliste
...
Und ausserdem: nur weil eine Klasse keinen Konstruktor hat, bedeutet das nicht,
dass man den Konstruktor nicht aufrufen kann oder muss:
Delphi-Quellcode:
type
TKarte = class
Typ: integer;
Sichtbar: Boolean;
Tisch: TImage;
end;
var
k : TKarte;
begin
// Da TKarte impliziert von TObject abgeleitet ist und TObject
// den Konstruktor .Create bereitstellt, gibt es nur einen
// richtigen Weg davon ein Objekt zu erzeugen
k:= TKarte.Create;