equal
deleted
inserted
replaced
108 ] |
108 ] |
109 |
109 |
110 "Modified: 28.1.1997 / 17:51:28 / cg" |
110 "Modified: 28.1.1997 / 17:51:28 / cg" |
111 ! |
111 ! |
112 |
112 |
|
113 horizontalLayout |
|
114 "not supported by this view" |
|
115 |
|
116 ^ nil |
|
117 ! |
|
118 |
|
119 horizontalLayout:aLayoutSymbol |
|
120 "not supported by this view" |
|
121 |
|
122 ! |
|
123 |
113 horizontalSpace:numberOfPixels |
124 horizontalSpace:numberOfPixels |
114 "set the horizontal space between elements on pixels (default is 1mm)" |
125 "set the horizontal space between elements on pixels (default is 1mm)" |
115 |
126 |
116 horizontalSpace ~= numberOfPixels ifTrue:[ |
127 horizontalSpace ~= numberOfPixels ifTrue:[ |
117 horizontalSpace := numberOfPixels. |
128 horizontalSpace := numberOfPixels. |
126 or:[horizontalSpace ~= numberOfPixels]) ifTrue:[ |
137 or:[horizontalSpace ~= numberOfPixels]) ifTrue:[ |
127 horizontalSpace := numberOfPixels. |
138 horizontalSpace := numberOfPixels. |
128 verticalSpace := numberOfPixels. |
139 verticalSpace := numberOfPixels. |
129 self layoutChanged |
140 self layoutChanged |
130 ] |
141 ] |
|
142 ! |
|
143 |
|
144 verticalLayout |
|
145 "not supported by this view" |
|
146 |
|
147 ^ nil |
|
148 ! |
|
149 |
|
150 verticalLayout:aLayoutSymbol |
|
151 "not supported by this view" |
|
152 |
131 ! |
153 ! |
132 |
154 |
133 verticalSpace:numberOfPixels |
155 verticalSpace:numberOfPixels |
134 "set the vertical space between elements (in pixels). |
156 "set the vertical space between elements (in pixels). |
135 The default is computed for 1mm spacing." |
157 The default is computed for 1mm spacing." |
323 ! ! |
345 ! ! |
324 |
346 |
325 !PanelView class methodsFor:'documentation'! |
347 !PanelView class methodsFor:'documentation'! |
326 |
348 |
327 version |
349 version |
328 ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.19 1997-01-28 17:05:11 cg Exp $' |
350 ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.20 1997-02-21 19:27:43 ca Exp $' |
329 ! ! |
351 ! ! |