draw poker, hand erkennung

[Cöster]

Delphi-Quellcode:

property RWert: TKartenwert read FWert;
property RFarbe: TKartenFarbe read FFarbe;
property RPosition: TKartenPosition read FPosition;
property WWert: TKartenwert write FWert;
property WFarbe: TKartenFarbe write FFarbe;
property WPosition: TKartenPosition write FPosition;

lässt sich vereinfachen durch

Delphi-Quellcode:

property Wert: TKartenwert read FWert write FWert;
property Farbe: TKartenFarbe read FFarbe write FFarbe;
property Position: TKartenPosition read FPosition write FPosition;

Zitat von zecke:

Exception, Zugriffsverletzung

Wo?