paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 18:50:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: fixed timers

Browse Source 
git-svn-id: trunk@992 -
This commit is contained in:
lazarus 2002-02-09 01:47:35 +00:00
parent 1c621915e8
commit f3950e0137
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -3049,6 +3049,7 @@ begin
DestroyCommonDialogAddOns(TCommonDialog(Sender));
end;
if Sender is THintWindow then writeln('TGTKObject.DestroyLCLControl DestroyWidget of ',Sender.ClassName,' creates the following gtk warnings:');
// destroy the widget
DestroyWidget(Widget);
@ -3080,6 +3081,8 @@ begin
LastMiddle:=EmptyLastMouseClick;
if LastRight.Component=Sender then
LastRight:=EmptyLastMouseClick;
if Sender is THintWindow then writeln('TGTKObject.DestroyLCLControl END');
end;
{-------------------------------------------------------------------------------
@ -6463,6 +6466,9 @@ end;
{ =============================================================================
$Log$
Revision 1.250 2002/10/15 16:01:36 lazarus
MG: fixed timers
Revision 1.249 2002/10/15 14:18:29 lazarus
MG: added TGtkObject.WordWrap