Changeset 460 for trunk/LocalPlayer/Draft.pas

Timestamp:

Nov 28, 2023, 3:16:24 PM (12 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/Draft.pas (modified) (3 diffs)

trunk/LocalPlayer/Draft.pas

@@ -5 +5 @@
 
 uses
-  Protocol, ClientTools, Term, ScreenTools, BaseWin, LCLIntf, LCLType, SysUtils,
+  Protocol, ClientTools, ScreenTools, BaseWin, LCLIntf, LCLType, SysUtils,
   Classes, Graphics, Controls, Forms, ExtCtrls, ButtonA, ButtonB, Area;
 
@@ -37 +37 @@
   end;
 
-var
-  DraftDlg: TDraftDlg;
-
 
 implementation
 
 uses
-  Help, Tribes, Directories;
+  Term, Help, Tribes, Directories;
 
 {$R *.lfm}
@@ -531 +528 @@
       I := (Y - yFeature) div LinePitch;
       if (X >= xFeature - 21) and (X < ClientWidth) and (ssShift in Shift) then
-        HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkFeature, Code[I])
+        MainScreen.HelpDlg.ShowNewContent(WindowModeMakePersistent(FWindowMode), hkFeature, Code[I])
       else if not(Code[I] in AutoFeature) then
       begin