Changeset 460 for trunk/LocalPlayer/CityType.pas

Timestamp:

Nov 28, 2023, 3:16:24 PM (6 months ago)

Author:

chronos

Message:

• Modified: Do not initialize all local player windows at the start of the game but later when they are really opened. This also fixes window initialization under Qt5 widgetset.

File:

• trunk/LocalPlayer/CityType.pas (modified) (4 diffs)

trunk/LocalPlayer/CityType.pas

@@ -5 +5 @@
 
 uses
-  Protocol, ClientTools, Term, ScreenTools, BaseWin, LCLIntf, LCLType,
-  SysUtils, Classes, Graphics, Controls, Forms,
-  ButtonB, ExtCtrls;
+  Protocol, ClientTools, ScreenTools, BaseWin, LCLIntf, LCLType,
+  SysUtils, Classes, Graphics, Controls, Forms, ButtonB, ExtCtrls;
 
 type
@@ -36 +35 @@
   end;
 
-var
-  CityTypeDlg: TCityTypeDlg;
 
 implementation
 
-uses Help;
+uses
+  Help, Term;
 
 {$R *.lfm}
@@ -246 +244 @@
   begin
     if ssShift in Shift then
-      HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkImp,
+      MainScreen.HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkImp,
         MyData.ImpOrder[ctype, I])
     else
@@ -263 +261 @@
   begin
     if ssShift in Shift then
-      HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkImp, Pooliix[I])
+      MainScreen.HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkImp, Pooliix[I])
     else
     begin