From d3caac78b7d428d5ece4a871536566e3666faa77 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Fri, 25 Mar 2011 08:56:24 +0000
Subject: [PATCH] win32: cleanup

git-svn-id: trunk@30013 -
---
 lcl/interfaces/win32/win32listsl.inc | 2 --
 lcl/interfaces/win32/win32winapi.inc | 3 ---
 2 files changed, 5 deletions(-)

diff --git a/lcl/interfaces/win32/win32listsl.inc b/lcl/interfaces/win32/win32listsl.inc
index 7d1c229984..9ff38c7665 100644
--- a/lcl/interfaces/win32/win32listsl.inc
+++ b/lcl/interfaces/win32/win32listsl.inc
@@ -332,8 +332,6 @@ end;
 { TWin32ComboBoxStringList }
 
 procedure TWin32ComboBoxStringList.InitFlags;
-var
-  R: TRect;
 begin
   FFlagSort         := UINT(CBS_SORT);
   FFlagGetText      := UINT(CB_GETLBTEXT);
diff --git a/lcl/interfaces/win32/win32winapi.inc b/lcl/interfaces/win32/win32winapi.inc
index a87a3fe95c..9fcc493ff7 100644
--- a/lcl/interfaces/win32/win32winapi.inc
+++ b/lcl/interfaces/win32/win32winapi.inc
@@ -34,9 +34,6 @@
 //  {$DEFINE ASSERT_IS_ON}
 {$ENDIF}
 
-const
-  BOOL_TEXT: array[Boolean] of string = ('False', 'True');
-
 //##apiwiz##sps##   // Do not remove
 
 {------------------------------------------------------------------------------