mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 07:55:58 +02:00
win32: cleanup
git-svn-id: trunk@30013 -
This commit is contained in:
parent
3fe1a6d2a2
commit
d3caac78b7
@ -332,8 +332,6 @@ end;
|
|||||||
{ TWin32ComboBoxStringList }
|
{ TWin32ComboBoxStringList }
|
||||||
|
|
||||||
procedure TWin32ComboBoxStringList.InitFlags;
|
procedure TWin32ComboBoxStringList.InitFlags;
|
||||||
var
|
|
||||||
R: TRect;
|
|
||||||
begin
|
begin
|
||||||
FFlagSort := UINT(CBS_SORT);
|
FFlagSort := UINT(CBS_SORT);
|
||||||
FFlagGetText := UINT(CB_GETLBTEXT);
|
FFlagGetText := UINT(CB_GETLBTEXT);
|
||||||
|
@ -34,9 +34,6 @@
|
|||||||
// {$DEFINE ASSERT_IS_ON}
|
// {$DEFINE ASSERT_IS_ON}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
const
|
|
||||||
BOOL_TEXT: array[Boolean] of string = ('False', 'True');
|
|
||||||
|
|
||||||
//##apiwiz##sps## // Do not remove
|
//##apiwiz##sps## // Do not remove
|
||||||
|
|
||||||
{------------------------------------------------------------------------------
|
{------------------------------------------------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user