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

LCL: Make TCustomComboBox.AddItem virtual. Issue #20033

Browse Source 
git-svn-id: trunk@33100 -
This commit is contained in:
juha 2011-10-26 16:53:48 +00:00
parent d39db22019
commit 260ece9f1b
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/stdctrls.pp
View File

@ -366,7 +366,7 @@ type
constructor Create(TheOwner: TComponent); override;
destructor Destroy; override;
procedure IntfGetItems;
procedure AddItem(const Item: String; AnObject: TObject); //override;
procedure AddItem(const Item: String; AnObject: TObject); virtual;
procedure AddHistoryItem(const Item: string; MaxHistoryCount: integer;
SetAsText, CaseSensitive: boolean);
procedure AddHistoryItem(const Item: string; AnObject: TObject;