equal
deleted
inserted
replaced
489 resizeData isNil ifTrue:[ |
489 resizeData isNil ifTrue:[ |
490 super exposeX:x y:y width:w height:h. |
490 super exposeX:x y:y width:w height:h. |
491 |
491 |
492 "/ handle any expose events (for subcomponents) before |
492 "/ handle any expose events (for subcomponents) before |
493 "/ redrawing the handles. |
493 "/ redrawing the handles. |
494 (self sensor hasExposeEventFor:nil) ifTrue:[^ self]. |
494 "/ (self sensor hasExposeEventFor:nil) ifTrue:[^ self]. |
495 |
495 "/ |
496 self selectionDo:[:aComponent | |
496 "/ self selectionDo:[:aComponent | |
497 aComponent withAllSubViewsDo:[:v | |
497 "/ aComponent withAllSubViewsDo:[:v | |
498 v realized ifTrue:[ |
498 "/ v realized ifTrue:[ |
499 self sensor flushExposeEventsFor:v. |
499 "/ self sensor flushExposeEventsFor:v. |
500 v exposeX:0 y:0 width:v width height:v height. |
500 "/ v exposeX:0 y:0 width:v width height:v height. |
501 ] |
501 "/ ] |
502 ]. |
502 "/ ]. |
503 self showSelected:aComponent |
503 "/ self showSelected:aComponent |
504 ] |
504 "/ ] |
505 ]. |
505 ]. |
506 |
506 |
507 "Modified: / 9.11.1998 / 12:50:34 / cg" |
507 "Modified: / 9.11.1998 / 12:50:34 / cg" |
508 ! |
508 ! |
509 |
509 |
597 anEvent view:self. |
597 anEvent view:self. |
598 ^ false. |
598 ^ false. |
599 ! |
599 ! |
600 |
600 |
601 redrawX:nx y:ny width:nw height:nh |
601 redrawX:nx y:ny width:nw height:nh |
602 "ignore redraws - my components redraw themself |
602 |redrawFrame| |
603 " |
603 |
|
604 redrawFrame := Rectangle left:nx top:ny width:nw height:nh. |
|
605 |
|
606 self selectionDo:[:aComponent | |
|
607 |anyHandleToRedraw| |
|
608 |
|
609 anyHandleToRedraw := false. |
|
610 self handlesOf:aComponent do:[:hRect :typeOfHandle | |
|
611 (hRect intersects:redrawFrame) ifTrue:[ |
|
612 anyHandleToRedraw := true. |
|
613 ]. |
|
614 ]. |
|
615 anyHandleToRedraw ifTrue:[ |
|
616 self showSelected:aComponent |
|
617 ] |
|
618 ] |
604 ! |
619 ! |
605 |
620 |
606 sizeChanged:how |
621 sizeChanged:how |
607 "size of a view(s) changed |
622 "size of a view(s) changed |
608 " |
623 " |