1{%MainUnit winceint.pp} 2{ $Id: wincelclintfh.inc 7541 2005-08-22 12:30:03Z vincents $ } 3 4{****************************************************************************** 5 All WinCE interface communication implementations. 6 7 !! Keep alphabetical !! 8 9 Support routines go to gtkproc.pp 10 11 ****************************************************************************** 12 Interface 13 ****************************************************************************** 14 15 ***************************************************************************** 16 This file is part of the Lazarus Component Library (LCL) 17 18 See the file COPYING.modifiedLGPL.txt, included in this distribution, 19 for details about the license. 20 ***************************************************************************** 21} 22 23//##apiwiz##sps## // Do not remove 24 25function AddEventHandler(AHandle: THandle; AFlags: dword; 26 AEventHandler: TWaitHandleEvent; AData: PtrInt): PEventHandler; override; 27function AddPipeEventHandler(AHandle: THandle; 28 AEventHandler: TPipeEvent; AData: PtrInt): PPipeEventHandler; override; 29function AddProcessEventHandler(AHandle: THandle; 30 AEventHandler: TChildExitEvent; AData: PtrInt): PProcessEventHandler; override; 31function AllocateHWnd(Method: TLCLWndMethod): HWND; override; 32 33function CreateStandardCursor(ACursor: SmallInt): hCursor; override; 34 35procedure DeallocateHWnd(Wnd: HWND); override; 36 37function GetAcceleratorString(const AVKey: Byte; const AShiftState: TShiftState): String; override; 38function GetControlConstraints(Constraints: TObject): boolean; override; 39function GetDeviceSize(DC: HDC; var p: TPoint): boolean; override; 40 41function RawImage_CreateBitmaps(const ARawImage: TRawImage; out ABitmap, AMask: HBitmap; ASkipMask: Boolean = False): Boolean; override; 42function RawImage_DescriptionFromBitmap(ABitmap: HBITMAP; out ADesc: TRawImageDescription): Boolean; override; 43function RawImage_DescriptionFromDevice(ADC: HDC; out ADesc: TRawImageDescription): Boolean; override; 44function RawImage_FromBitmap(out ARawImage: TRawImage; ABitmap, AMask: HBITMAP; ARect: PRect = nil): Boolean; override; 45function RawImage_FromDevice(out ARawImage: TRawImage; ADC: HDC; const ARect: TRect): Boolean; override; 46// override only when queried formats are different from screen description 47function RawImage_QueryDescription(AFlags: TRawImageQueryFlags; var ADesc: TRawImageDescription): Boolean; override; 48 49procedure RemoveEventHandler(var AHandler: PEventHandler); override; 50procedure RemovePipeEventHandler(var AHandler: PPipeEventHandler); override; 51procedure RemoveProcessEventHandler(var AHandler: PProcessEventHandler); override; 52 53 54//##apiwiz##eps## // Do not remove, no wizard declaration after this line 55