Changeset 70 for trunk/Forms/UFormSettings.pas

Timestamp:

Aug 1, 2016, 1:10:13 PM (8 years ago)

Author:

chronos

Message:

• Added: Allow to configure application to start automatically on user logon and start minimized to tray.

File:

• trunk/Forms/UFormSettings.pas (modified) (3 diffs)

trunk/Forms/UFormSettings.pas

@@ -16 +16 @@
     ButtonOk: TButton;
     ButtonCancel: TButton;
+    CheckBoxStartMinimizedToTray: TCheckBox;
+    CheckBoxStartOnLogon: TCheckBox;
     CheckBoxAlwaysOnTop: TCheckBox;
     ComboBoxLanguage: TComboBox;
@@ -56 +58 @@
 begin
   CheckBoxAlwaysOnTop.Checked := FormMain.AlwaysOnTop;
+  CheckBoxStartOnLogon.Checked := FormMain.StartOnLogon;
+  CheckBoxStartMinimizedToTray.Checked := FormMain.StartMinimizedToTray;
 end;
 
@@ -61 +65 @@
 begin
   FormMain.AlwaysOnTop := CheckBoxAlwaysOnTop.Checked;
+  FormMain.StartOnLogon := CheckBoxStartOnLogon.Checked;
+  FormMain.StartMinimizedToTray := CheckBoxStartMinimizedToTray.Checked;
 end;