Bug fix for shell:startup

Now, the app registers as minimised when starting with the -tray parameter
Codrax · Jun 3, 2023 · 879baad · 879baad
1 parent 5341cc0
commit 879baad
Show file tree

Hide file tree

Showing 3 changed files with 2 additions and 7 deletions.
diff --git a/MainUI.dfm b/MainUI.dfm
@@ -38,8 +38,6 @@ object UIForm: TUIForm
       Align = alClient
       TabOrder = 0
       OnNavigateComplete2 = Version_CheckNavigateComplete2
-      ExplicitWidth = 300
-      ExplicitHeight = 150
       ControlData = {
         4C000000F7010000340300000000000000000000000000000000000000000000
         000000004C000000000000000000000001000000E0D057007335CF11AE690800
@@ -208564,8 +208562,6 @@ object UIForm: TUIForm
               Animations.PAAnimateEngine = cbneAtDraw
               Animations.FadeAnimation = True
               Animations.FASpeed = 10
-              ExplicitLeft = 526
-              ExplicitTop = 2
             end
             object MoreButtons: TPanel
               Left = 302
@@ -208914,7 +208910,6 @@ object UIForm: TUIForm
           PageSize = 0
           TabOrder = 0
           OnChange = QueueScrollChange
-          ExplicitHeight = 233
         end
         object Panel14: TPanel
           Left = 0
@@ -208925,7 +208920,6 @@ object UIForm: TUIForm
           BevelOuter = bvNone
           ShowCaption = False
           TabOrder = 1
-          ExplicitTop = 8
           object Label23: TLabel
             AlignWithMargins = True
             Left = 15

diff --git a/iBroadcast.dpr b/iBroadcast.dpr
@@ -47,6 +47,7 @@ begin
       if Param = '-tray' then
         begin
           Application.ShowMainForm := false;
+          HiddenToTray := true;
         end;
 
       if Param = '-logging' then

diff --git a/iBroadcast.dproj b/iBroadcast.dproj
@@ -122,7 +122,7 @@
         <Icon_MainIcon>iBroadcast_Icon.ico</Icon_MainIcon>
         <VerInfo_MinorVer>3</VerInfo_MinorVer>
         <VerInfo_Keys>CompanyName=Codrut Software;FileDescription=Codrut&apos;s iBroadcast for Windows;FileVersion=1.3.0.0;InternalName=;LegalCopyright=Codrut Software;LegalTrademarks=Petculescu Codrut;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
-        <Debugger_RunParams>-logging</Debugger_RunParams>
+        <Debugger_RunParams>-tray</Debugger_RunParams>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
         <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>