UIPainter.st
changeset 2477 e51d7128bcd4
parent 2442 9dceed2892bd
child 2479 fda2e68c7cad
equal deleted inserted replaced
2476:a8dbbb7aa571 2477:e51d7128bcd4
  4353                         t := layoutView sizeFixed.
  4353                         t := layoutView sizeFixed.
  4354                         layoutView sizeFixed:false.
  4354                         layoutView sizeFixed:false.
  4355                         layout := layoutView preferredExtent.    
  4355                         layout := layoutView preferredExtent.    
  4356                         layoutView sizeFixed:t.
  4356                         layoutView sizeFixed:t.
  4357                     ].
  4357                     ].
       
  4358                     spec usePreferredWidth:(layoutTool aspectFor:#usePreferredWidth) value.
       
  4359                     spec usePreferredHeight:(layoutTool aspectFor:#usePreferredHeight) value.
       
  4360                     spec useDynamicPreferredWidth:(layoutTool aspectFor:#useDynamicPreferredWidth) value.
       
  4361                     spec useDynamicPreferredHeight:(layoutTool aspectFor:#useDynamicPreferredHeight) value.
  4358                     painter setExtent:layout.
  4362                     painter setExtent:layout.
  4359                     painter updateFromSpec:spec.
  4363                     painter updateFromSpec:spec.
  4360                 ]
  4364                 ]
  4361             ] ifFalse:[
  4365             ] ifFalse:[
  4362                 spec useDefaultExtent:false.
  4366                 spec useDefaultExtent:false.
  4363                 spec usePreferredWidth:(layoutTool aspectFor:#usePreferredWidth) value.
  4367                 spec usePreferredWidth:(layoutTool aspectFor:#usePreferredWidth) value.
  4364                 spec usePreferredHeight:(layoutTool aspectFor:#usePreferredHeight) value.
  4368                 spec usePreferredHeight:(layoutTool aspectFor:#usePreferredHeight) value.
  4365                 spec useDynamicPreferredWidth:(layoutTool aspectFor:#useDynamicPreferredWidth) value.
  4369                 spec useDynamicPreferredWidth:(layoutTool aspectFor:#useDynamicPreferredWidth) value.
  4366                 spec useDynamicPreferredHeight:(layoutTool aspectFor:#useDynamicPreferredHeight) value.
  4370                 spec useDynamicPreferredHeight:(layoutTool aspectFor:#useDynamicPreferredHeight) value.
  4367                 painter setLayout:layout
  4371                 painter setLayout:layout.
       
  4372                 painter updateFromSpec:spec.
  4368             ].
  4373             ].
  4369         ]
  4374         ]
  4370     ] ifFalse:[
  4375     ] ifFalse:[
  4371         self isHelpToolSelected ifTrue:[
  4376         self isHelpToolSelected ifTrue:[
  4372             self helpTool accept.      
  4377             self helpTool accept.