File tree Expand file tree Collapse file tree 3 files changed +9
-8
lines changed
Expand file tree Collapse file tree 3 files changed +9
-8
lines changed Original file line number Diff line number Diff line change 436436Global {ref}`TRSShop` variable.
437437*)
438438 Shop: TRSShop;
439-
440-
441- function TRSGameTabs.GetCurrent(): ERSGameTab; override;
442- begin
443- Result := inherited;
444- if (Result = ERSGameTab.NONE) and Shop.IsOpen() then
445- Result := ERSGameTab.INVENTORY;
446- end;
Original file line number Diff line number Diff line change 9595
9696 if Bank.IsOpen() then Exit(ERSGameTab.INVENTORY);
9797
98+ if Shop.IsOpen() then Exit(ERSGameTab.INVENTORY);
99+
98100 if not HouseOptions.IsOpen() then Exit;
99101 Result := ERSGameTab.OPTIONS;
100102 if RSMouseZoom.SettingChecked then Exit;
Original file line number Diff line number Diff line change 9797 BOLD_SHADOW: TPixelFont;
9898 QUILL_8: TPixelFont;
9999 QUILL: TPixelFont;
100+ VERDANA_13: TPixelFont;
101+ VERDANA_13_Bold:TPixelFont;
102+ VERDANA_15: TPixelFont;
100103 Unzipping: Boolean;
101104 Timeout: TCountDown;
102105
@@ -126,6 +129,10 @@ begin
126129
127130 Self.QUILL_8 := OCR.Engine.LoadFont(Self.PATH + 'Quill 8', 4);
128131 Self.QUILL := OCR.Engine.LoadFont(Self.PATH + 'Quill', 4);
132+
133+ Self.VERDANA_13 := OCR.Engine.LoadFont(Self.PATH + 'Verdana 13', 4);
134+ Self.VERDANA_13_Bold := OCR.Engine.LoadFont(Self.PATH + 'Verdana 13 Bold', 4);
135+ Self.VERDANA_15 := OCR.Engine.LoadFont(Self.PATH + 'Verdana 15', 4);
129136end;
130137
131138procedure TRSFonts._UnzipFinished(constref result: TASyncUnzipResult);
You can’t perform that action at this time.
0 commit comments