MG: implemented hints

git-svn-id: trunk@1362 -
This commit is contained in:
lazarus 2002-02-09 01:48:19 +00:00
parent f64948aa55
commit f777645c9e

View File

@ -1078,16 +1078,6 @@ begin
Result := TLMessage(AMessage).Result;
end;
{------------------------------------------------------------------------------
procedure NotifyApplicationUserInput;
------------------------------------------------------------------------------}
procedure NotifyApplicationUserInput;
begin
if Application<>nil then
Application.NotifyUserInputHandler;
end;
{------------------------------------------------------------------------------
Function: ObjectToGTKObject
@ -3957,6 +3947,9 @@ end;
{ =============================================================================
$Log$
Revision 1.148 2002/11/05 20:03:42 lazarus
MG: implemented hints
Revision 1.147 2002/11/02 22:25:38 lazarus
MG: implemented TMethodList and Application Idle handlers