36
36
function AddProcessEventHandler(AHandle: THandle;
37
37
AEventHandler: TChildExitEvent; AData: PtrInt): PProcessEventHandler; override;
38
38
function AskUser(const DialogCaption, DialogMessage: string; DialogType:
41
41
function CreateStandardCursor(ACursor: SmallInt): hCursor; override;
42
42
function CreateRubberBand(const ARect: TRect; const ABrush: HBrush = 0): HWND; override;
43
43
procedure DestroyRubberBand(ARubberBand: HWND); override;
45
45
procedure DrawGrid(DC: HDC; const R: TRect; DX, DY: Integer); override;
47
47
function ExtUTF8Out(DC: HDC; X, Y: Integer; Options: Longint; Rect: PRect;