DialogBox.st
changeset 2106 40b0e35b3dbc
parent 2080 620d5ac7dee5
child 2110 ad32442191f0
equal deleted inserted replaced
2105:364c74512645 2106:40b0e35b3dbc
  3181 !
  3181 !
  3182 
  3182 
  3183 acceptCheck:aBlock
  3183 acceptCheck:aBlock
  3184     "if nonNil, the acceptCheck-block is evaluated when the dialog is
  3184     "if nonNil, the acceptCheck-block is evaluated when the dialog is
  3185      accepted (ok-button or Return-key). If it returns true, the box is closed,
  3185      accepted (ok-button or Return-key). If it returns true, the box is closed,
  3186      otherwise not."
  3186      otherwise not. Of course, you may also use a valueHolder instead of a block
       
  3187      to provide the check value."
  3187 
  3188 
  3188     acceptCheck := aBlock
  3189     acceptCheck := aBlock
       
  3190 
       
  3191     "Modified: / 25.1.2000 / 20:56:04 / cg"
  3189 !
  3192 !
  3190 
  3193 
  3191 acceptOnLeave:aBoolean
  3194 acceptOnLeave:aBoolean
  3192     "define the behavior when the last input field is left via cursor keys.
  3195     "define the behavior when the last input field is left via cursor keys.
  3193      The default is to accept & close the dialog (i.e. true)."
  3196      The default is to accept & close the dialog (i.e. true)."
  6206 ! !
  6209 ! !
  6207 
  6210 
  6208 !DialogBox class methodsFor:'documentation'!
  6211 !DialogBox class methodsFor:'documentation'!
  6209 
  6212 
  6210 version
  6213 version
  6211     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.139 1999-12-09 22:50:49 cg Exp $'
  6214     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.140 2000-01-27 12:01:59 cg Exp $'
  6212 ! !
  6215 ! !
  6213 DialogBox initialize!
  6216 DialogBox initialize!