258 |
258 |
259 "Modified: / 24.8.2001 / 15:35:33 / cg" |
259 "Modified: / 24.8.2001 / 15:35:33 / cg" |
260 ! |
260 ! |
261 |
261 |
262 pointerEnter:state x:bx y:by |
262 pointerEnter:state x:bx y:by |
263 |h| |
263 "this could be send by the KDE before a button press event; |
264 |
264 test whether the state == 0 |
265 state == 0 ifTrue:[ |
265 " |
266 view snapMode notNil ifTrue:[ |
266 |handle| |
267 (h := self detectHandleIndexAt:bx y:by) notNil ifTrue:[ |
267 |
268 self buttonMotion:state x:bx y:by |
268 state ~~ 0 ifTrue:[ ^ self ]. |
269 ] |
269 |
270 ] |
270 view snapMode notNil ifTrue:[ |
271 ] |
271 "/ test whether a handle is under the cursor |
|
272 handle := self detectHandleIndexAt:bx y:by. |
|
273 |
|
274 handle notNil ifTrue:[ |
|
275 "/ there is a handel; thus we have to setup the cursor... |
|
276 self buttonMotion:state x:bx y:by |
|
277 ]. |
|
278 ]. |
272 ! |
279 ! |
273 |
280 |
274 pointerLeave:state |
281 pointerLeave:state |
|
282 "this could be send by the KDE before a button press event; |
|
283 test whether the state == 0 |
|
284 " |
|
285 state ~~ 0 ifTrue:[ ^ self ]. |
|
286 |
|
287 "/ the view is leave and no button is pressed |
|
288 "/ restore the cursor and redraw the snap if not nil |
275 |
289 |
276 saveCursor notNil ifTrue:[ |
290 saveCursor notNil ifTrue:[ |
277 "restore the cursor" |
291 "restore the cursor" |
278 view cursor:saveCursor. |
292 view cursor:saveCursor. |
279 saveCursor := nil |
293 saveCursor := nil |
280 ]. |
294 ]. |
281 |
295 |
282 state == 0 ifTrue:[ |
296 resizeMode := nil. |
283 resizeMode := nil. |
297 |
284 |
298 movedHandle notNil ifTrue:[ |
285 movedHandle notNil ifTrue:[ |
299 view drawSnapAt:movedHandle. |
286 view drawSnapAt:movedHandle. |
300 self buttonRelease:1 x:0 y:0. |
287 self buttonRelease:1 x:0 y:0. |
301 movedHandle := nil. |
288 movedHandle := nil. |
|
289 ] |
|
290 ]. |
302 ]. |
291 ! ! |
303 ! ! |
292 |
304 |
293 !VariablePanelController methodsFor:'private'! |
305 !VariablePanelController methodsFor:'private'! |
294 |
306 |