paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 03:39:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: use MainFormOnTaskBar for the lazarus application

Browse Source 
git-svn-id: trunk@42113 -
This commit is contained in:
paul 2013-07-17 08:01:59 +00:00
parent c93aa0be7b
commit a402774cac
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/lazarus.pp
View File

@ -89,6 +89,7 @@ begin
LazarusRevisionStr:=RevisionStr; LazarusRevisionStr:=RevisionStr;
Application.Title:='Lazarus'; Application.Title:='Lazarus';
OnGetApplicationName:=@GetLazarusApplicationName; OnGetApplicationName:=@GetLazarusApplicationName;
Application.MainFormOnTaskBar := True;
Application.Initialize; Application.Initialize;
TMainIDE.ParseCmdLineOptions; TMainIDE.ParseCmdLineOptions;
if not SetupMainIDEInstance then exit; if not SetupMainIDEInstance then exit;