paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 21:40:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

implemented tabstop

Browse Source 
git-svn-id: trunk@2586 -
This commit is contained in:
mattias 2002-08-17 23:41:30 +00:00
parent 73524e09ba
commit e4cead0682
1 changed files with 3 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lcl/interfaces/gtk/gtkobject.inc
View File

@ -3227,16 +3227,6 @@ begin
GDK_KEY_PRESS_MASK);
ConnectSenderSignal(gObject, 'key-release-event', @GTKKeyUpDown,
GDK_KEY_RELEASE_MASK);
end
else
if (Sender is TCustomListBox) then Begin
//TODO:listbox is STILL not sendig keypress events even with these lines.
ConnectSenderSignal(gCore, 'key-press-event', @GTKKeyUpDown,
GDK_KEY_PRESS_MASK);
ConnectSenderSignal(gCore, 'key-release-event', @GTKKeyUpDown,
GDK_KEY_RELEASE_MASK);
end;
ConnectSenderSignal(gCore, 'key-press-event', @GTKKeyUpDown,
GDK_KEY_PRESS_MASK);
@ -7324,6 +7314,9 @@ end;
{ =============================================================================
$Log$
Revision 1.374 2003/06/10 17:23:35 mattias
implemented tabstop
Revision 1.373 2003/06/10 12:28:23 mattias
fixed anchoring controls