Changeset 725 for trunk/NoTerm.pas

Timestamp:

Jan 13, 2026, 4:01:26 PM (3 hours ago)

Author:

chronos

Message:

• Modified: Initialize InputDlg, MessgDlg and SettingsDlg dialogs dynamically on demand.

File:

• trunk/NoTerm.pas (modified) (2 diffs)

trunk/NoTerm.pas

@@ -114 +114 @@
   NewStat;
   if G.RO[Me].Turn > 0 then
-    with MessgDlg do
-    begin
+    with TMessgDlg.Create(nil) do
+    try
       MessgText := Phrases.Lookup('ENDTOUR');
       Kind := mkYesNo;
@@ -123 +123 @@
       else
         EndCommand := sBreak;
+    finally
+      Free;
     end
   else