equal
deleted
inserted
replaced
255 okButton width:max. |
255 okButton width:max. |
256 abortButton width:max. |
256 abortButton width:max. |
257 |
257 |
258 w := (formLabel width + textLabel width) max:max * 2. |
258 w := (formLabel width + textLabel width) max:max * 2. |
259 w := w + (3 * mm) + (okButton borderWidth + abortButton borderWidth * 2). |
259 w := w + (3 * mm) + (okButton borderWidth + abortButton borderWidth * 2). |
|
260 w := w max:self maxPreferredWidthOfAddedComponents. |
260 |
261 |
261 h := (mm * 5) |
262 h := (mm * 5) |
262 + ((formLabel height) max:(textLabel height)) |
263 + ((formLabel height) max:(textLabel height)) |
263 + ((addedComponents ? #()) inject:0 into:[:sum :thisComponent | sum + thisComponent preferredExtent y]) |
264 + ((addedComponents ? #()) inject:0 into:[:sum :thisComponent | sum + thisComponent preferredExtent y]) |
264 + okButton heightIncludingBorder. |
265 + okButton heightIncludingBorder. |
317 ! ! |
318 ! ! |
318 |
319 |
319 !YesNoBox class methodsFor:'documentation'! |
320 !YesNoBox class methodsFor:'documentation'! |
320 |
321 |
321 version |
322 version |
322 ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.53 2003-09-10 15:01:48 cg Exp $' |
323 ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.54 2003-09-10 15:13:18 cg Exp $' |
323 ! ! |
324 ! ! |