Changeset 536 for trunk/LocalPlayer/Select.pas

Timestamp:

Apr 15, 2024, 8:59:23 PM (7 months ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

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

trunk/LocalPlayer/Select.pas

@@ -242 +242 @@
   CityReport: TCityReportNew;
   mox: ^TModelInfo;
-  S, number: string;
+  S, Number: string;
   CanGrow: Boolean;
 begin
@@ -363 +363 @@
               y0 + 2, 131, 3);
             ca.Font.Assign(UniFont[ftSmall]);
-            RisedTextout(Offscreen.Canvas, 103 + CityNameSpace + 4 + 31,
+            RisedTextOut(Offscreen.Canvas, 103 + CityNameSpace + 4 + 31,
               y0 + 1, S);
             ca.Font.Assign(UniFont[ftNormal]);
@@ -652 +652 @@
               else if (Kind = kScience) and (FutureCount > 0) then
               begin
-                number := IntToStr(FutureCount);
-                RisedTextout(ca, 104 - 33 + 15 + 10 + TechNameSpace + 24 * J -
-                  BiColorTextWidth(ca, number) div 2, y0, number);
+                Number := IntToStr(FutureCount);
+                RisedTextOut(ca, 104 - 33 + 15 + 10 + TechNameSpace + 24 * J -
+                  BiColorTextWidth(ca, Number) div 2, y0, Number);
               end;
             end;