VariablePanel.st
changeset 1159 856ac1c6046c
parent 1158 225c0d52068d
child 1207 2668cd0caee7
equal deleted inserted replaced
1158:225c0d52068d 1159:856ac1c6046c
  1109 
  1109 
  1110 unlockRedraw
  1110 unlockRedraw
  1111     redrawLocked := false
  1111     redrawLocked := false
  1112 ! !
  1112 ! !
  1113 
  1113 
       
  1114 !VariablePanel methodsFor:'enumerating subviews'!
       
  1115 
       
  1116 changeSequenceOrderFor:aSubView to:anIndex
       
  1117     "change a subview's position into subviews collection
       
  1118     "
       
  1119     |success|
       
  1120 
       
  1121     success := super changeSequenceOrderFor:aSubView to:anIndex.
       
  1122 
       
  1123     success ifTrue:[
       
  1124         self setupSubviews.
       
  1125         self resizeSubviews.
       
  1126     ].
       
  1127     ^ success
       
  1128 
       
  1129 
       
  1130 ! !
       
  1131 
  1114 !VariablePanel methodsFor:'event handling'!
  1132 !VariablePanel methodsFor:'event handling'!
  1115 
  1133 
  1116 sizeChanged:how
  1134 sizeChanged:how
  1117     "my size has changed; resize my subviews"
  1135     "my size has changed; resize my subviews"
  1118 
  1136 
  1476 ! !
  1494 ! !
  1477 
  1495 
  1478 !VariablePanel class methodsFor:'documentation'!
  1496 !VariablePanel class methodsFor:'documentation'!
  1479 
  1497 
  1480 version
  1498 version
  1481     ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.30 1997-03-28 13:46:01 cg Exp $'
  1499     ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.31 1997-03-28 14:51:18 ca Exp $'
  1482 ! !
  1500 ! !