Changeset 172


Ignore:
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.
Location:
trunk/LocalPlayer
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LocalPlayer/Help.pas

    r171 r172  
    14061406          Caption := HelpText.Lookup('HELPTITLE_TECHLIST');
    14071407          List := THyperText.Create;
     1408          List.OwnsObjects := True;
    14081409          for j := 0 to 3 do
    14091410          begin
     
    15221523          // AddLine(HelpText.Lookup('HELPTITLE_IMPLIST'),pkSection);
    15231524          List := THyperText.Create;
     1525          List.OwnsObjects := True;
    15241526          for i := 28 to nImp - 1 do
    15251527            if (i <> imTrGoods) and (Imp[i].Preq <> preNA) and
     
    17881790          Caption := HelpText.Lookup('HELPTITLE_FEATURELIST');
    17891791          List := THyperText.Create;
     1792          List.OwnsObjects := True;
    17901793          for Special := 0 to 2 do
    17911794          begin
  • trunk/LocalPlayer/PVSB.pas

    r171 r172  
    153153begin
    154154  FMax := AValue;
    155   ScrollBar.Max := Math.Max(0, Max{$IFDEF LINUX} - PageSize + 1{$ENDIF});
     155  ScrollBar.Max := Math.Max(0, FMax);
    156156end;
    157157
Note: See TracChangeset for help on using the changeset viewer.