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

lcl: ifdef to allow old fpdoc parse

Browse Source 
git-svn-id: trunk@54526 -
This commit is contained in:
mattias 2017-04-05 09:31:38 +00:00
parent 6139a22bcf
commit 3ea79c5046
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/extctrls.pp
View File

@ -1436,7 +1436,7 @@ type
{ TCtrlBands }
TCtrlBands = class (specialize TFPGObjectList<TCtrlBand>)
TCtrlBands = class ({$IFDEF FPDoc}TFPGObjectList{$ELSE}specialize TFPGObjectList<TCtrlBand>{$ENDIF})
public
function GetIndex(AControl: TControl): Integer;
end;