Changeset 370 for trunk/Include/Classes/System/Drawing/Color.ab

Timestamp:

Nov 3, 2007, 5:18:30 PM (16 years ago)

Author:

dai

Message:

System.GCクラスを追加。
64ビットコンパイラで生じる警告を改修した。

File:

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

trunk/Include/Classes/System/Drawing/Color.ab

@@ -131 +131 @@
         Dim max = System.Math.Max(System.Math.Max(r, g), b) As Long
         Dim min = System.Math.Min(System.Math.Min(r, g), b) As Long
-        Return (max - min) / max
+        Return ( (max - min) / max ) As Single
     End Function
 
@@ -139 +139 @@
         Dim b = B
         Dim max = System.Math.Max(System.Math.Max(r, g), b)
-        Return max * (1 / 255)
+        Return ( max * (1 / 255) ) As Single
     End Function