TPlayingCard -
AddCardBack -
AddCardTool -
DrawCardBack -
DrawCardFace - Copy Work2 onto the canvas
DrawCardTool -
GetCardBack -
GetCardBackCount -
GetCardTool -
GetCardToolCount -
LoadCardBack -
LoadCardTool -
Register - Setup routines
TShowOption
function AddCardBack(Bitmap: TBitmap): Integer;
function AddCardTool(Bitmap: TBitmap): Integer;
procedure DrawCardBack(Index: Integer; Canvas: TCanvas; CRect: TRect; Invert: Boolean);
procedure DrawCardFace(Index: Integer; Canvas: TCanvas; CRect: TRect; Invert: Boolean);
Copy Work2 onto the canvas
procedure DrawCardTool(Index: Integer; Canvas: TCanvas; CRect: TRect; Invert: Boolean);
function GetCardBack(Index: Integer): TBitmap;
function GetCardBackCount: Integer;
function GetCardTool(Index: Integer): TBitmap;
function GetCardToolCount: Integer;
function LoadCardBack(const Filename: string): Integer;
function LoadCardTool(const Filename: string): Integer;
procedure Register;
Setup routines
TShowOption = (soFace, soTool, soBack);