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

IDE: fixed compilation

Browse Source 
git-svn-id: trunk@43822 -
This commit is contained in:
mattias 2014-01-27 08:25:39 +00:00
parent 5504a82697
commit 1efbde31e6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/frames/editor_codefolding_options.pas
View File

@ -116,7 +116,7 @@ begin
FoldConfigCheckListBox.Checked[j] :=
Hl.FoldConfig[FCurFoldInfo.Info^[i].Index].Enabled and
(Hl.FoldConfig[FCurFoldInfo.Info^[i].Index].Modes * [fmFold, fmHide] <> []);
FoldConfigCheckListBox.Items.Objects[j] := TObject(i);
FoldConfigCheckListBox.Items.Objects[j] := TObject(Pointer(i));
end;
end;
end;