paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-10 02:28:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix a bug in cmQuitApp handling

Browse Source
This commit is contained in:
pierre 2003-01-31 11:01:00 +00:00
parent 5c302e181f
commit 0ae5ded638
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/fpide.pas
View File

@ -759,7 +759,7 @@ begin
cmShowReadme : ShowReadme;
{$ifdef FVISION}
cmResizeApp : ResizeApplication(Event.Id, Event.InfoWord);
cmQuitApp : Message(@Self, evCommand, cmQuitApp, nil);
cmQuitApp : Message(@Self, evCommand, cmQuit, nil);
{$endif FVISION}
else DontClear:=true;
end;
@ -1254,7 +1254,10 @@ end;
END.
{
$Log$
Revision 1.24 2002-12-12 00:06:41 pierre
Revision 1.25 2003-01-31 11:01:00 pierre
* fix a bug in cmQuitApp handling
Revision 1.24 2002/12/12 00:06:41 pierre
Use fpregs unit
Revision 1.23 2002/11/28 12:58:15 pierre