| Class TCards (unit Tomcard2) |
TImage
| Constructors |
constructor Create(AOwner: TComponent);fake a BM header to keep LoadFromStream happy
| Functions |
procedure DisplayCard;
procedure LoadDLLBmp(FileName:string; BmpId:Integer; Dest:TBitmap);
procedure SetCardBackStyle(value:integer);
procedure SetDeckValue(value:integer);
procedure SetState(value:TCardState);
procedure SetSuit(value:TCardSuit);
procedure SetValue(value:integer);| Properties |
property CardBackStyle : integer
property Deckvalue : Integer
property State : TCardState
property Suit : TCardSuit
property Value : integer
property SuitColor : TSuitColor| Events |
| Variables |
FCardBackStyle : integer;
FDValue : Integer;
FState : TCardState;
FSuit : TCardSuit;
FSuitColor : TSuitColor;
FValue : integer;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
fake a BM header to keep LoadFromStream happy
| Functions |
procedure DisplayCard;
procedure LoadDLLBmp(FileName:string; BmpId:Integer; Dest:TBitmap);
procedure SetCardBackStyle(value:integer);
procedure SetDeckValue(value:integer);
procedure SetState(value:TCardState);
procedure SetSuit(value:TCardSuit);
procedure SetValue(value:integer);| Properties |
property CardBackStyle : integer
property Deckvalue : Integer
property State : TCardStatePublished declarations
property Suit : TCardSuit
property Value : integer
property SuitColor : TSuitColor| Events |
| Variables |
FCardBackStyle : integer;
FDValue : Integer;
FState : TCardState;Private declarations
FSuit : TCardSuit;
FSuitColor : TSuitColor;
FValue : integer;