Changeset 464 for trunk/Packages/CevoComponents/GraphicSet.pas

Timestamp:

Nov 29, 2023, 6:25:22 PM (7 months ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

• trunk/Packages/CevoComponents/GraphicSet.pas (modified) (2 diffs)

trunk/Packages/CevoComponents/GraphicSet.pas

@@ -45 +45 @@
     Data: TBitmap;
     Mask: TBitmap;
-    pixUsed: array of Byte;
+    PixUsed: array of Byte;
     Items: TGraphicSetItems;
     procedure ResetPixUsed;
@@ -169 +169 @@
 procedure TGraphicSet.ResetPixUsed;
 begin
-  SetLength(pixUsed, Data.Height div 49 * 10);
-  if Length(pixUsed) > 0 then
-    FillChar(pixUsed[0], Length(pixUsed), 0);
+  SetLength(PixUsed, Data.Height div 49 * 10);
+  if Length(PixUsed) > 0 then
+    FillChar(PixUsed[0], Length(PixUsed), 0);
 end;