equal
deleted
inserted
replaced
97 |
97 |
98 ^ bounds |
98 ^ bounds |
99 |
99 |
100 "Created: 8.5.1996 / 23:35:19 / cg" |
100 "Created: 8.5.1996 / 23:35:19 / cg" |
101 "Modified: 9.5.1996 / 00:12:00 / cg" |
101 "Modified: 9.5.1996 / 00:12:00 / cg" |
102 ! |
102 ! ! |
|
103 |
|
104 !VisualComponent ignoredMethodsFor:'accessing - dimensions'! |
103 |
105 |
104 bounds:aRectangle |
106 bounds:aRectangle |
105 "set my bounds" |
107 "set my bounds" |
106 |
108 |
107 bounds := aRectangle |
109 bounds := aRectangle |
108 |
110 |
109 "Created: 8.5.1996 / 23:36:07 / cg" |
111 "Created: 8.5.1996 / 23:36:07 / cg" |
110 "Modified: 9.5.1996 / 00:13:12 / cg" |
112 "Modified: 9.5.1996 / 00:13:12 / cg" |
111 ! |
113 ! ! |
|
114 |
|
115 !VisualComponent methodsFor:'accessing - dimensions'! |
112 |
116 |
113 left |
117 left |
114 "return my left x coordinate" |
118 "return my left x coordinate" |
115 |
119 |
116 ^ self bounds left |
120 ^ self bounds left |
284 ! ! |
288 ! ! |
285 |
289 |
286 !VisualComponent class methodsFor:'documentation'! |
290 !VisualComponent class methodsFor:'documentation'! |
287 |
291 |
288 version |
292 version |
289 ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.8 1996-06-05 15:22:32 cg Exp $' |
293 ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.9 1996-06-05 15:22:58 cg Exp $' |
290 ! ! |
294 ! ! |