Changeset 241 for branch/egtra-gdiplus/Classes/System/Drawing/RectangleF.ab
- Timestamp:
- May 9, 2007, 10:26:36 PM (18 years ago)
- Location:
- branch/egtra-gdiplus
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
branch/egtra-gdiplus/Classes/System/Drawing/RectangleF.ab
r212 r241 4 4 #define __SYSTEM_DRAWING_RECTANGLEF_AB__ 5 5 6 #include <Classes/System/Math.ab> 7 #include <Classes/System/Drawing/PointF.ab> 8 #include <Classes/System/Drawing/SizeF.ab> 6 #require <Classes/System/Math.ab> 7 #require <Classes/System/Drawing/PointF.ab> 8 #require <Classes/System/Drawing/SizeF.ab> 9 10 Namespace System 11 Namespace Drawing 9 12 10 13 Class RectangleF … … 112 115 End If 113 116 End Function 114 /* 115 Function Operator =(ByRef rc As RectangleF) 116 With rc 117 x = .x 118 y = .y 119 width = .width 120 height = .height 121 End With 122 End Function 123 */ 117 124 118 Function Operator ==(rc As RectangleF) 125 119 Return Equals(rc) … … 185 179 This = RectangleF.Intersect(This, rect) 186 180 End Sub 187 181 188 182 Static Function Intersect(a As RectangleF, b As RectangleF) As RectangleF 189 183 Dim right As Single, bottom As Single, left As Single, top As Single … … 231 225 End Class 232 226 227 End Namespace 'Drawing 228 End Namespace 'System 229 233 230 #endif '__SYSTEM_DRAWING_RECTFANGLE_AB__
Note:
See TracChangeset
for help on using the changeset viewer.