Changeset 172 for trunk/LocalPlayer/Help.pas

Timestamp:

Jun 15, 2019, 8:13:43 PM (5 years ago)

Author:

chronos

Message:

• Fixed: Scrollbar in Help form was not working correctly under Linux.
• Fixed: Incorrect deallocation of objects in Help form.

File:

• trunk/LocalPlayer/Help.pas (modified) (3 diffs)

trunk/LocalPlayer/Help.pas

@@ -1406 +1406 @@
           Caption := HelpText.Lookup('HELPTITLE_TECHLIST');
           List := THyperText.Create;
+          List.OwnsObjects := True;
           for j := 0 to 3 do
           begin
@@ -1522 +1523 @@
           // AddLine(HelpText.Lookup('HELPTITLE_IMPLIST'),pkSection);
           List := THyperText.Create;
+          List.OwnsObjects := True;
           for i := 28 to nImp - 1 do
             if (i <> imTrGoods) and (Imp[i].Preq <> preNA) and
@@ -1788 +1790 @@
           Caption := HelpText.Lookup('HELPTITLE_FEATURELIST');
           List := THyperText.Create;
+          List.OwnsObjects := True;
           for Special := 0 to 2 do
           begin