From a7e622e6abb449cecc6dac16ad1cbae151ea690c Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Thu, 7 Apr 2011 00:19:59 +0000
Subject: [PATCH] lcl: formatting

git-svn-id: trunk@30226 -
---
 lcl/include/controlscrollbar.inc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/include/controlscrollbar.inc b/lcl/include/controlscrollbar.inc
index f27539cdde..b38b938292 100644
--- a/lcl/include/controlscrollbar.inc
+++ b/lcl/include/controlscrollbar.inc
@@ -133,7 +133,7 @@ begin
   begin
     ScrollInfo.fMask := SIF_POS;
     GetScrollInfo(ControlHandle, IntfBarKind[Kind], ScrollInfo);
-    if FPosition<>ScrollInfo.nPos then
+    if FPosition <> ScrollInfo.nPos then
     begin
       FPosition := ScrollInfo.nPos;
       InvalidateScrollInfo;
@@ -449,7 +449,7 @@ end;
 constructor TControlScrollBar.Create(AControl: TWinControl;
   AKind: TScrollBarKind);
 begin
-  Inherited Create;
+  inherited Create;
   FControl := AControl;
   FKind := AKind;
   FPage := 80;