paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 13:39:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

reduced focus handling and improved focus setting

Browse Source 
git-svn-id: trunk@2360 -
This commit is contained in:
mattias 2002-08-17 23:41:18 +00:00
parent 29c3d65cc9
commit 937b768cdb
2 changed files with 12 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
lcl/include/control.inc
View File

@ -938,17 +938,17 @@ begin
Dispatch(TheMessage); Dispatch(TheMessage);
end; end;
{------------------------------------------------------------------------------} {------------------------------------------------------------------------------
{ TControl SendDockNotification } TControl SendDockNotification
{------------------------------------------------------------------------------} ------------------------------------------------------------------------------}
Procedure SendDockNotification(Msg: Cardinal; WParam, LParam : Integer); Procedure SendDockNotification(Msg: Cardinal; WParam, LParam : Integer);
Begin Begin
//TODO: SendDockNotification //TODO: SendDockNotification
end; end;
{------------------------------------------------------------------------------} {------------------------------------------------------------------------------
{ TControl Invalidate } TControl Invalidate
{------------------------------------------------------------------------------} ------------------------------------------------------------------------------}
procedure TControl.Invalidate; procedure TControl.Invalidate;
Begin Begin
InvalidateControl(Visible, csOpaque in ControlStyle); InvalidateControl(Visible, csOpaque in ControlStyle);
@ -2079,6 +2079,9 @@ end;
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.120 2003/03/25 10:45:40 mattias
reduced focus handling and improved focus setting
Revision 1.119 2003/03/17 23:39:30 mattias Revision 1.119 2003/03/17 23:39:30 mattias
added TCheckGroup added TCheckGroup

4
lcl/interfaces/gtk/gtkproc.pp
View File

@ -70,7 +70,9 @@ function gtkfrmdeactivateAfter( widget: PGtkWidget; Event : PgdkEventFocus;
function GTKMap(Widget: PGTKWidget; Data: gPointer): GBoolean; cdecl; function GTKMap(Widget: PGTKWidget; Data: gPointer): GBoolean; cdecl;
function GTKKeyUpDown(Widget: PGtkWidget; Event : pgdkeventkey; function GTKKeyUpDown(Widget: PGtkWidget; Event : pgdkeventkey;
Data: gPointer) : GBoolean; cdecl; Data: gPointer) : GBoolean; cdecl;
function GTKFocusCB( widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl; function GTKFocusCB(widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl;
function GTKFocusCBAfter(widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl;
function GTKKillFocusCB(widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl;
function GTKKillFocusCBAfter(widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl; function GTKKillFocusCBAfter(widget: PGtkWidget; event:PGdkEventFocus; data: gPointer) : GBoolean; cdecl;
function gtkdestroyCB(widget: PGtkWidget; data: gPointer) : GBoolean; cdecl; function gtkdestroyCB(widget: PGtkWidget; data: gPointer) : GBoolean; cdecl;
function gtkdeleteCB( widget : PGtkWidget; event : PGdkEvent; data : gPointer) : GBoolean; cdecl; function gtkdeleteCB( widget : PGtkWidget; event : PGdkEvent; data : gPointer) : GBoolean; cdecl;