From c4c2cdc5cd8cf87591fd6e46bf0ec9252955fbe2 Mon Sep 17 00:00:00 2001 From: paul Date: Wed, 30 Sep 2009 07:47:53 +0000 Subject: [PATCH] lcl: formatting git-svn-id: trunk@21926 - --- lcl/interfaces/win32/win32winapi.inc | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lcl/interfaces/win32/win32winapi.inc b/lcl/interfaces/win32/win32winapi.inc index 7712b6a639..f11537087f 100644 --- a/lcl/interfaces/win32/win32winapi.inc +++ b/lcl/interfaces/win32/win32winapi.inc @@ -1777,10 +1777,8 @@ var begin Assert(False, Format('Trace:> [TWin32WidgetSet.GetDC] HWND: 0x%x', [HWnd])); Result := Windows.GetDC(HWnd); - if (Result<>0) and (HWnd<>0) - and GetLCLClientBoundsOffset(HWnd, ORect) then begin + if (Result <> 0) and (HWnd <> 0) and GetLCLClientBoundsOffset(HWnd, ORect) then MoveWindowOrgEx(Result, ORect.Left, ORect.Top); - end; Assert(False, Format('Trace:< [TWin32WidgetSet.GetDC] Got 0x%x', [Result])); end; @@ -1808,7 +1806,7 @@ begin Result := GetObjectType(PaintDC) = OBJ_DC; if not Result then Exit; Result := Windows.GetDCOrgEx(PaintDC, DCOrg); - if not Result then exit; + if not Result then Exit; winOrg.X := 0; winOrg.Y := 0; Result := Windows.ClientToScreen(WindowHandle, winOrg);