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

+ TIDEApp.Idle does always call GiveUpTimeSlice

Browse Source
This commit is contained in:
florian 1999-12-17 15:07:01 +00:00
parent eb70ce1522
commit ff5d46b647
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/text/fpide.pas
View File

@ -416,6 +416,7 @@ procedure TIDEApp.Idle;
begin begin
inherited Idle; inherited Idle;
Message(Application,evIdle,0,nil); Message(Application,evIdle,0,nil);
GiveUpTimeSlice;
end; end;
procedure TIDEApp.GetEvent(var Event: TEvent); procedure TIDEApp.GetEvent(var Event: TEvent);
@ -854,7 +855,10 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.45 1999-12-10 13:02:05 pierre Revision 1.46 1999-12-17 15:07:01 florian
+ TIDEApp.Idle does always call GiveUpTimeSlice
Revision 1.45 1999/12/10 13:02:05 pierre
+ VideoMode save/restore + VideoMode save/restore
Revision 1.44 1999/11/25 00:26:49 pierre Revision 1.44 1999/11/25 00:26:49 pierre