paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-19 12:59:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: started mouse bugfix and completed Makefile.fpc

Browse Source 
git-svn-id: trunk@1199 -
This commit is contained in:
lazarus 2002-02-09 01:48:05 +00:00
parent da86d8e8b9
commit 53255e3f75
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/include/application.inc
View File

@ -343,9 +343,9 @@ end;
{------------------------------------------------------------------------------}
procedure TApplication.Run;
begin
if FMainForm <> nil
if FMainForm <> nil
then FMainForm.Show;
repeat
HandleMessage;
if Assigned(FMainForm) and (FMainForm.ModalResult = mrCancel)
@ -411,6 +411,9 @@ end;
{ =============================================================================
$Log$
Revision 1.23 2002/05/24 07:16:31 lazarus
MG: started mouse bugfix and completed Makefile.fpc
Revision 1.22 2002/05/10 06:05:51 lazarus
MG: changed license to LGPL