Changeset 360


Ignore:
Timestamp:
Apr 9, 2021, 10:21:16 AM (7 months ago)
Author:
chronos
Message:
  • Fixed: Vertical position of scroll bar in unit list.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LocalPlayer/Select.pas

    r352 r360  
    15511551    (Kind in [kProject, kAdvance, kFarAdvance]);
    15521552  if (Kind = kAdvance) and (MyData.FarTech <> adNone) or (Kind = kModels) or
    1553     (Kind = kEModels) then
    1554     TitleHeight := WideFrame + 20
    1555   else
     1553    (Kind = kEModels) then begin
     1554    sb.SetBorderSpacing(56, 10, 10);
     1555    TitleHeight := WideFrame + 20;
     1556  end else begin
     1557    sb.SetBorderSpacing(36, 10, 34);
    15561558    TitleHeight := WideFrame;
     1559  end;
    15571560
    15581561  DispLines := Lines[0];
Note: See TracChangeset for help on using the changeset viewer.