From ea198f397292c74cd2eb76ab26e20a547e2a804a Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Thu, 11 Sep 2008 03:14:24 +0000
Subject: [PATCH] formatting

git-svn-id: trunk@16538 -
---
 lcl/interfaces/win32/win32wscontrols.pp | 4 ++--
 lcl/interfaces/win32/win32wsstdctrls.pp | 3 ++-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/lcl/interfaces/win32/win32wscontrols.pp b/lcl/interfaces/win32/win32wscontrols.pp
index d081776287..bf53b1cd75 100644
--- a/lcl/interfaces/win32/win32wscontrols.pp
+++ b/lcl/interfaces/win32/win32wscontrols.pp
@@ -468,7 +468,7 @@ begin
 end;
 
 class procedure TWin32WSWinControl.SetText(const AWinControl: TWinControl; const AText: string);
-Begin
+begin
   if not WSCheckHandleAllocated(AWincontrol, 'SetText') then Exit;
 
 {$ifdef WindowsUnicodeSupport}
@@ -478,7 +478,7 @@ Begin
 {$else}
   Windows.SetWindowText(AWinControl.Handle, PChar(AText));
 {$endif}
-End;
+end;
 
 class procedure TWin32WSWinControl.SetCursor(const AWinControl: TWinControl;
   const ACursor: HCursor);
diff --git a/lcl/interfaces/win32/win32wsstdctrls.pp b/lcl/interfaces/win32/win32wsstdctrls.pp
index e7fe32ef4e..05e9f13531 100644
--- a/lcl/interfaces/win32/win32wsstdctrls.pp
+++ b/lcl/interfaces/win32/win32wsstdctrls.pp
@@ -1469,7 +1469,8 @@ begin
     iconHeight := GetSystemMetrics(SM_CYMENUCHECK);
     if iconHeight > PreferredHeight then
       PreferredHeight := iconHeight;
-    if WithThemeSpace then begin
+    if WithThemeSpace then
+    begin
       Inc(PreferredWidth, 6);
       Inc(PreferredHeight, 6);
     end;