Changeset 166 for Include/Classes/System/Drawing/RectangleF.ab

Timestamp:

Mar 13, 2007, 11:55:49 AM (18 years ago)

Author:

イグトランス (egtra)

Message:

GetHashCodeを実装

File:

• Include/Classes/System/Drawing/RectangleF.ab (modified) (3 diffs)

Include/Classes/System/Drawing/RectangleF.ab

@@ -113 +113 @@
     End Function
 
-    Function Operator = (ByRef rc As RectangleF)
+    Function Operator =(ByRef rc As RectangleF)
         With rc
             x = .x
@@ -122 +122 @@
     End Function
 
-    Function Operator == (ByRef rc As RectangleF)
+    Function Operator ==(ByRef rc As RectangleF)
         Return Equals(rc)
     End Function
 
-    Function Operator <> (ByRef rc As RectangleF)
+    Function Operator <>(ByRef rc As RectangleF)
         Return Not Equals(rc)
     End Function
@@ -136 +136 @@
             Equals = _System_FALSE
         End If
+    End Function
+
+    Override Function GetHashCode() As Long
+        Return GetDWord(VarPtr(x)) Xor _System_BSwap(GetDWord(VarPtr(y))) Xor GetDWord(VarPtr(width)) Xor _System_BSwap(GetDWord(VarPtr(height)))
     End Function