Unit Cards

Classes

TPlayingCard -

Functions

AddCardBack -
AddCardTool -
DrawCardBack -
DrawCardFace - Copy Work2 onto the canvas
DrawCardTool -
GetCardBack -
GetCardBackCount -
GetCardTool -
GetCardToolCount -
LoadCardBack -
LoadCardTool -
Register - Setup routines

Types

TShowOption

Constants

Variables


Functions


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

Types


TShowOption = (soFace, soTool, soBack);

Constants


Variables