paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-01 02:11:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

fix parentcolor initialization, in createwnd is too late

Browse Source 
git-svn-id: trunk@6150 -
This commit is contained in:
micha 2004-10-17 14:40:38 +00:00
parent c1b5b77b3c
commit 784df09a2d
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/include/customcombobox.inc
View File

@ -41,7 +41,6 @@ begin
end;
// and use the interface based list
FItems:= NewStrings;
ParentColor := false;
if FItemIndex <> -1 then
TWSCustomComboBoxClass(WidgetSetClass).SetItemIndex(Self, FItemIndex);
@ -572,6 +571,7 @@ begin
TControlCanvas(FCanvas).Control := Self;
ArrowKeysTraverseList := True;
TabStop := true;
ParentColor := false;
end;
{------------------------------------------------------------------------------
@ -793,6 +793,9 @@ end;
{
$Log$
Revision 1.48 2004/10/17 14:40:38 micha
fix parentcolor initialization, in createwnd is too late
Revision 1.47 2004/09/20 21:01:04 micha
convert LM_SETPROPERTIES to interface methods for TCustomComboBox