mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-24 22:19:12 +02:00
IDE: disable MainFormOnTaskBar on windows
git-svn-id: trunk@42421 -
This commit is contained in:
parent
35ec9d7384
commit
239209c3a4
@ -91,12 +91,14 @@ begin
|
|||||||
Application.Title:='Lazarus';
|
Application.Title:='Lazarus';
|
||||||
OnGetApplicationName:=@GetLazarusApplicationName;
|
OnGetApplicationName:=@GetLazarusApplicationName;
|
||||||
|
|
||||||
|
{$IFDEF Windows}
|
||||||
// on windows when MainFormOnTaskBar = True the main form becomes
|
// on windows when MainFormOnTaskBar = True the main form becomes
|
||||||
// the parent of all other forms and therefore it always shows under
|
// the parent of all other forms and therefore it always shows under
|
||||||
// other forms. For Lazarus the main form is the component palette form
|
// other forms. For Lazarus the main form is the component palette form
|
||||||
// and it is not a desired behavior to see it always under other windows.
|
// and it is not a desired behavior to see it always under other windows.
|
||||||
// So until we have a good docking solution let's have a dummy taskbar windows on windows.
|
// So until we have a good docking solution let's have a dummy taskbar windows on windows.
|
||||||
Application.{%H-}MainFormOnTaskBar := False;
|
Application.{%H-}MainFormOnTaskBar := False;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
Application.Initialize;
|
Application.Initialize;
|
||||||
TMainIDE.ParseCmdLineOptions;
|
TMainIDE.ParseCmdLineOptions;
|
||||||
|
Loading…
Reference in New Issue
Block a user