Browse Source

* Make color distinct from cardinal

Michaël Van Canneyt 1 năm trước cách đây
mục cha
commit
cbbcc4356a
1 tập tin đã thay đổi với 2 bổ sung2 xóa
  1. 2 2
      packages/rtl-objpas/src/inc/system.uitypes.pp

+ 2 - 2
packages/rtl-objpas/src/inc/system.uitypes.pp

@@ -25,9 +25,9 @@ interface
 Type  
     TColor      = -$7FFFFFFF-1..$7FFFFFFF;
     PColor      = ^TColor;
-    TColorRef   = Cardinal;
+    TColorRef   = Type Cardinal;
     PColorRef   = ^TColorRef;
-    TAlphaColor = Cardinal;
+    TAlphaColor = Type Cardinal;
     PAlphaColor = ^TAlphaColor;
     TImageIndex = type Integer;