equal
deleted
inserted
replaced
19 |
19 |
20 Point comment:' |
20 Point comment:' |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libbasic/Point.st,v 1.20 1995-04-02 11:07:32 claus Exp $ |
24 $Header: /cvs/stx/stx/libbasic/Point.st,v 1.21 1995-05-08 03:30:26 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !Point class methodsFor:'documentation'! |
27 !Point class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libbasic/Point.st,v 1.20 1995-04-02 11:07:32 claus Exp $ |
45 $Header: /cvs/stx/stx/libbasic/Point.st,v 1.21 1995-05-08 03:30:26 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
290 asRectangle |
290 asRectangle |
291 "return a zero-width rectangle consisting of origin |
291 "return a zero-width rectangle consisting of origin |
292 and corner being the receiver" |
292 and corner being the receiver" |
293 |
293 |
294 ^ self corner:self |
294 ^ self corner:self |
|
295 ! |
|
296 |
|
297 asLayout |
|
298 "return a LayoutOrigin from the receiver. |
|
299 If the receiver coordinates are between 0 and 1, take |
|
300 them as fractional parts (relative to superview). |
|
301 Otherwise, treat them as absolute offsets. |
|
302 Notice: in 10.5.x LayoutOrigin is not yet released." |
|
303 |
|
304 ^ LayoutOrigin fromPoint:self |
|
305 ! |
|
306 |
|
307 asFractionalLayout |
|
308 "return a LayoutOrigin from the receiver, |
|
309 treating the receiver coordinates as fractional parts |
|
310 (i.e. relative to superview). |
|
311 Notice: in 10.5.x LayoutOrigin is not yet released." |
|
312 |
|
313 ^ LayoutOrigin fractionalFromPoint:self |
|
314 ! |
|
315 |
|
316 asOffsetLayout |
|
317 "return a LayoutOrigin from the receiver, |
|
318 treating the receiver coordinates as absolute offsets. |
|
319 Notice: in 10.5.x LayoutOrigin is not yet released." |
|
320 |
|
321 ^ LayoutOrigin offsetFromPoint:self |
295 ! ! |
322 ! ! |
296 |
323 |
297 !Point methodsFor:'creating rectangles'! |
324 !Point methodsFor:'creating rectangles'! |
298 |
325 |
299 corner:aPoint |
326 corner:aPoint |