Changeset 96 for trunk/Forms/UFormMain.pas

Timestamp:

Aug 2, 2018, 10:41:11 AM (6 years ago)

Author:

chronos

Message:

• Added: Theming support.
• Modified: Items in Options dialog divided to two pages.

File:

• trunk/Forms/UFormMain.pas (modified) (4 diffs)

trunk/Forms/UFormMain.pas

@@ -202 +202 @@
     DockInit;
     Core.PersistentForm1.Load(Self, True);
+    Core.ThemeManager.UseTheme(Self)
   end;
 end;
@@ -435 +436 @@
 procedure TFormMain.AViewCompilersExecute(Sender: TObject);
 begin
+  if not Assigned(FormTargets) then FormTargets := TFormTargets.Create(Self);
   FormTargets.Show;
 end;
@@ -445 +447 @@
 procedure TFormMain.AViewLogExecute(Sender: TObject);
 begin
+  if not Assigned(FormLog) then FormLog := TFormLog.Create(Self);
   FormLog.Show;
 end;
@@ -480 +483 @@
         end;
       end;
+      Core.ThemeManager.UseTheme(Self);
     end;
   finally