UIObjectView.st
changeset 997 2a8a32256d4a
parent 993 88a214788277
child 1016 2660d468dc61
equal deleted inserted replaced
996:9423ae277168 997:2a8a32256d4a
   919             v borderWidth ~~ 0 ifTrue:[
   919             v borderWidth ~~ 0 ifTrue:[
   920                 c := v borderColor.
   920                 c := v borderColor.
   921                 v borderColor:(Color colorId:1).
   921                 v borderColor:(Color colorId:1).
   922                 v borderColor:c.
   922                 v borderColor:c.
   923             ].
   923             ].
   924             v exposeX:0 y:0 width:9999 height:9999
   924             v exposeX:0 y:0 width:(v width) height:(v height)
   925         ]
   925         ]
   926     ]
   926     ]
       
   927 
       
   928     "Modified: / 16.9.1998 / 01:40:30 / cg"
   927 !
   929 !
   928 
   930 
   929 handlesOf:aComponent do:aTwoArgAction
   931 handlesOf:aComponent do:aTwoArgAction
   930     "perform action on each handle of a component
   932     "perform action on each handle of a component
   931     "
   933     "