paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 07:29:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: clean up

Browse Source 
git-svn-id: branches/fixes_1_8@56575 -
This commit is contained in:
mattias 2017-12-01 16:33:36 +00:00
parent a327d7ac2f
commit 2d59334c5a
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/include/comboex.inc
View File

@ -703,15 +703,9 @@ begin
end;
procedure TCustomCheckCombo.InitializeWnd;
var
i: Integer;
begin
InitItemStates;
for i:=0 to Items.Count-1 do
debugln(['TCustomCheckCombo.InitializeWnd START ',i,' ',dbgsname(Items.Objects[i])]);
inherited InitializeWnd;
for i:=0 to Items.Count-1 do
debugln(['TCustomCheckCombo.InitializeWnd END ',i,' ',dbgsname(Items.Objects[i])]);
CheckItemStates;
FRightToLeft:=IsRightToLeft;
end;