Changeset 104 for Include/Classes/System/Drawing/RectangleF.ab
- Timestamp:
- Feb 16, 2007, 7:34:38 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Include/Classes/System/Drawing/RectangleF.ab
r32 r104 105 105 End Function 106 106 107 Function IsEmpty() As B OOL107 Function IsEmpty() As Boolean 108 108 If Width <= 0 Or Height <= 0 Then 109 109 IsEmpty = _System_TRUE … … 130 130 End Function 131 131 132 Function Equals(ByRef rc As RectangleF) As B OOL132 Function Equals(ByRef rc As RectangleF) As Boolean 133 133 If X = rc.X And Y = rc.Y And Width = rc.Width And Height = rc.Height Then 134 134 Equals = _System_TRUE … … 143 143 End Function 144 144 145 Function Contains(x As Single, y As Single) As B OOL145 Function Contains(x As Single, y As Single) As Boolean 146 146 If x >= X And x < X + Width And y >= Y And y < Y + Height Then 147 147 Contains = _System_TRUE … … 151 151 End Function 152 152 153 Function Contains(ByRef pt As PointF) As B OOL153 Function Contains(ByRef pt As PointF) As Boolean 154 154 ContainsPTF = Contains(pt.X, pt.Y) 155 155 End Function 156 156 157 Function Contains(ByRef rc As RectangleF) As B OOL157 Function Contains(ByRef rc As RectangleF) As Boolean 158 158 If X <= rc.X And rc.Right <= Right And Y <= rc.Y And rc.Bottom <= Bottom Then 159 159 ContainsRCF = _System_TRUE … … 192 192 End Function 193 193 194 Function IntersectsWith(ByRef rc As RectangleF) As B OOL194 Function IntersectsWith(ByRef rc As RectangleF) As Boolean 195 195 If Left < rc.Right And _ 196 196 Top < rc.Bottom And _
Note:
See TracChangeset
for help on using the changeset viewer.