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

implemented TListBox.TopIndex

Browse Source 
git-svn-id: trunk@2390 -
This commit is contained in:
mattias 2002-08-17 23:41:19 +00:00
parent af88c037ec
commit 1057c266a2
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/interfaces/gtk/gtkint.pp
View File

@ -160,8 +160,8 @@ type
procedure ListViewAddItem(TheListView: TObject); procedure ListViewAddItem(TheListView: TObject);
// listbox // listbox
function GetTopIndex(ListBoxObj: TObject): integer; function GetTopIndex(Sender: TObject): integer;
function SetTopIndex(ListBoxObj: TObject; NewTopIndex: integer): integer; function SetTopIndex(Sender: TObject; NewTopIndex: integer): integer;
procedure BringFormToFront(Sender: TObject); procedure BringFormToFront(Sender: TObject);
procedure SetWindowSizeAndPosition(Window: PGtkWindow; procedure SetWindowSizeAndPosition(Window: PGtkWindow;
@ -322,6 +322,9 @@ end.
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.115 2002/12/27 10:23:40 mattias
implemented TListBox.TopIndex
Revision 1.114 2002/12/27 08:46:32 mattias Revision 1.114 2002/12/27 08:46:32 mattias
changes for fpc 1.1 changes for fpc 1.1