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

Added procedure ListBox.Clear (changes by chris, added by stoppok)

Browse Source 
git-svn-id: trunk@8 -
This commit is contained in:
lazarus 2000-07-16 12:45:01 +00:00
parent 22127cbbef
commit b3206798a8
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/stdctrls.pp
View File

@ -68,7 +68,7 @@ type
procedure CreateHandle; override;
procedure DestroyHandle; override;
procedure DoChange(var msg); message LM_CHANGED;
procedure AttachSignals; override;
procedure AttachSignals; override;
//TODO: Took the virtual; off next line
function GetSelLength : integer;
//TODO: Took the virtual; off next line
@ -148,6 +148,7 @@ type
public
constructor Create(AOwner : TComponent); override;
destructor Destroy; override;
procedure Clear;
property ItemIndex : integer read GetItemIndex write SetItemIndex;
property Items : TStrings read FItems write SetItems;
property MultiSelect : boolean read FMultiSelect write SetMultiSelect;
@ -456,6 +457,9 @@ end.
{ =============================================================================
$Log$
Revision 1.2 2000/07/16 12:45:01 lazarus
Added procedure ListBox.Clear (changes by chris, added by stoppok)
Revision 1.1 2000/07/13 10:28:24 michael
+ Initial import