VisualComponent.st
changeset 2233 7245ea01ade1
parent 2210 d50fff3f6898
child 2659 0583c55f7000
equal deleted inserted replaced
2232:27fd06c66a02 2233:7245ea01ade1
   241 
   241 
   242     "Created: 8.5.1996 / 23:36:07 / cg"
   242     "Created: 8.5.1996 / 23:36:07 / cg"
   243     "Modified: 26.5.1996 / 12:56:22 / cg"
   243     "Modified: 26.5.1996 / 12:56:22 / cg"
   244 !
   244 !
   245 
   245 
       
   246 origin:newOrigin
       
   247     "move my bounds"
       
   248 
       
   249     bounds isNil ifTrue:[
       
   250         self containerChangedSize
       
   251     ].
       
   252     bounds := newOrigin extent:(bounds extent).
       
   253 
       
   254     "Created: 8.5.1996 / 23:36:07 / cg"
       
   255     "Modified: 9.5.1996 / 00:13:12 / cg"
       
   256 !
       
   257 
   246 preferredBounds
   258 preferredBounds
   247     "return my preferredBounds"
   259     "return my preferredBounds"
   248 
   260 
   249     ^ 0@0 extent:100@100
   261     ^ 0@0 extent:100@100
   250 
   262 
   525 ! !
   537 ! !
   526 
   538 
   527 !VisualComponent class methodsFor:'documentation'!
   539 !VisualComponent class methodsFor:'documentation'!
   528 
   540 
   529 version
   541 version
   530     ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.21 2006-09-11 13:01:30 fm Exp $'
   542     ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.22 2006-09-19 17:22:16 fm Exp $'
   531 ! !
   543 ! !