From 53edb14849708c530f39690c48aed2e45dbd8316 Mon Sep 17 00:00:00 2001 From: zeljko Date: Mon, 29 Mar 2010 12:48:19 +0000 Subject: [PATCH] wince: added IsWindow() git-svn-id: trunk@24285 - --- lcl/interfaces/wince/wincewinapi.inc | 10 ++++++++++ lcl/interfaces/wince/wincewinapih.inc | 1 + 2 files changed, 11 insertions(+) diff --git a/lcl/interfaces/wince/wincewinapi.inc b/lcl/interfaces/wince/wincewinapi.inc index 1bf73d70c2..f1299384e7 100644 --- a/lcl/interfaces/wince/wincewinapi.inc +++ b/lcl/interfaces/wince/wincewinapi.inc @@ -2145,6 +2145,16 @@ begin Result := Windows.IntersectClipRect(DC, Left, Top, Right, Bottom); end; +{------------------------------------------------------------------------------ + Method: IsWindow + Params: handle - window handle + Returns: true if handle is window , false otherwise + ------------------------------------------------------------------------------} +function TWinCEWidgetSet.IsWindow(handle: HWND): boolean; override; +begin + Result := Boolean(Windows.IsWindow(handle)); +end; + {------------------------------------------------------------------------------ Method: IsWindowEnabled Params: handle - window handle diff --git a/lcl/interfaces/wince/wincewinapih.inc b/lcl/interfaces/wince/wincewinapih.inc index 220acc85e9..b733433ea8 100644 --- a/lcl/interfaces/wince/wincewinapih.inc +++ b/lcl/interfaces/wince/wincewinapih.inc @@ -153,6 +153,7 @@ function HideCaret(hWnd: HWND): Boolean; override; procedure InitializeCriticalSection(var CritSection: TCriticalSection); override; function IntersectClipRect(dc: hdc; Left, Top, Right, Bottom: Integer): Integer; override; function InvalidateRect(aHandle : HWND; Rect : pRect; bErase : Boolean) : Boolean; override; +function IsWindow(handle: HWND): boolean; override; function IsWindowEnabled(handle: HWND): boolean; override; function IsWindowVisible(handle: HWND): boolean; override;