Changeset 352 for trunk/Packages/CevoComponents/DrawDlg.pas

Timestamp:

Apr 6, 2021, 10:16:55 PM (4 years ago)

Author:

chronos

Message:

• Modified: TTexture changed from record to class.
• Modified: Code cleanup.

File:

• trunk/Packages/CevoComponents/DrawDlg.pas (modified) (1 diff)

trunk/Packages/CevoComponents/DrawDlg.pas

@@ -258 +258 @@
       $000000, $000000);
   Frame(Canvas, Border + 1, Border + 1, ClientWidth - (2 + Border),
-    ClientHeight - (2 + Border), MainTexture.clBevelLight,
-    MainTexture.clBevelShade);
+    ClientHeight - (2 + Border), MainTexture.ColorBevelLight,
+    MainTexture.ColorBevelShade);
   Frame(Canvas, 2 + Border, 2 + Border, ClientWidth - (3 + Border),
-    ClientHeight - (3 + Border), MainTexture.clBevelLight,
-    MainTexture.clBevelShade);
+    ClientHeight - (3 + Border), MainTexture.ColorBevelLight,
+    MainTexture.ColorBevelShade);
   SplitText(false);