Changeset 313 for trunk/LocalPlayer/Enhance.pas

Timestamp:

Mar 17, 2021, 11:11:55 AM (3 years ago)

Author:

chronos

Message:

• Modified: LoadGraphicSet now returns TGrExtDescr reference. Replaced integer index references to GrExt with with direct class reference to TGrExtDescr.

File:

• trunk/LocalPlayer/Enhance.pas (modified) (1 diff)

trunk/LocalPlayer/Enhance.pas

@@ -97 +97 @@
     if Controls[i] is TButtonC then
       BitBltCanvas(Canvas, Controls[i].Left + 2, Controls[i].Top - 11, 8, 8,
-        GrExt[HGrSystem].Data.Canvas, 121 + Controls[i].Tag mod 7 * 9,
+        HGrSystem.Data.Canvas, 121 + Controls[i].Tag mod 7 * 9,
         1 + Controls[i].Tag div 7 * 9);
 end;