Changeset 77 for Include/Classes/System/Drawing/Color.ab

Timestamp:

Jan 27, 2007, 12:04:09 PM (18 years ago)

Author:

イグトランス (egtra)

Message:

Controlの追加とそれに伴う修正

File:

• Include/Classes/System/Drawing/Color.ab (modified) (2 diffs)

Include/Classes/System/Drawing/Color.ab

@@ -50 +50 @@
 
     Function A() As Byte
-        Return (Argb >> Color_AlphaShift) As Byte
+        Return (argb >> ALPHA_SHIFT) As Byte
     End Function
 
     Function R() As Byte
-        Return (Argb >> Color_RedShift) As Byte
+        Return (argb >> RED_SHIFT) As Byte
     End Function
 
     Function G() As Byte
-        Return (Argb >> Color_GreenShift) As Byte
+        Return (argb >> GREEN_SHIFT) As Byte
     End Function
 
     Function B() As Byte
-        GetBlue = (argb >> Color_BlueShift) As Byte
+        Return (argb >> BLUE_SHIFT) As Byte
     End Function
 
@@ -306 +306 @@
 */
     Static Function MakeARGB(a As Byte, r As Byte, g As Byte, b As Byte) As ARGB
-        MakeARGB = (((b As ARGB) <<  Color_BlueShift) Or _
-                    ((g As ARGB) << Color_GreenShift) Or _
-                    ((r As ARGB) <<   Color_RedShift) Or _
-                    ((a As ARGB) << Color_AlphaShift))
+        MakeARGB = (((b As ARGB) <<  BLUE_SHIFT) Or _
+                    ((g As ARGB) << GREEN_SHIFT) Or _
+                    ((r As ARGB) <<   RED_SHIFT) Or _
+                    ((a As ARGB) << ALPHA_SHIFT))
     End Function