DialogBox.st
changeset 4682 6ac21b8c27f3
parent 4671 c59883574da1
child 4690 8d29570eaa36
equal deleted inserted replaced
4681:8e75820273a8 4682:6ac21b8c27f3
  1721 
  1721 
  1722 confirmWithCancel:aString labels:labelArray
  1722 confirmWithCancel:aString labels:labelArray
  1723     "launch a Dialog, which allows user to enter cancel, no or yes.
  1723     "launch a Dialog, which allows user to enter cancel, no or yes.
  1724      Return true for 'yes', false for 'no', nil for 'cancel'.
  1724      Return true for 'yes', false for 'no', nil for 'cancel'.
  1725      The default is yes.
  1725      The default is yes.
  1726      The buttons labels are given in labelArray"
  1726      The buttons labels are given in labelArray, cancel being first, yes being last
       
  1727      (notice that the order may get reversed in some styles)"
  1727 
  1728 
  1728     ^ self
  1729     ^ self
  1729         confirmWithCancel:aString 
  1730         confirmWithCancel:aString 
  1730         labels:(self classResources array:labelArray)
  1731         labels:(self classResources array:labelArray)
  1731         default:3
  1732         default:3
  1732     "
  1733     "
  1733      Dialog confirmWithCancel:'really ?' labels:#( 'Oops' 'Nope' 'Yea')
  1734      Dialog confirmWithCancel:'really ?' labels:#( 'Oops' 'Nope' 'Yea')
       
  1735      Dialog confirmWithCancel:'really ?'
  1734     "
  1736     "
  1735 
  1737 
  1736     "Modified: / 02-03-2007 / 15:10:34 / cg"
  1738     "Modified: / 02-03-2007 / 15:10:34 / cg"
  1737 !
  1739 !
  1738 
  1740 
  9982 ! !
  9984 ! !
  9983 
  9985 
  9984 !DialogBox class methodsFor:'documentation'!
  9986 !DialogBox class methodsFor:'documentation'!
  9985 
  9987 
  9986 version
  9988 version
  9987     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.342 2013-08-23 18:38:40 cg Exp $'
  9989     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.343 2013-08-27 15:03:23 cg Exp $'
  9988 !
  9990 !
  9989 
  9991 
  9990 version_CVS
  9992 version_CVS
  9991     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.342 2013-08-23 18:38:40 cg Exp $'
  9993     ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.343 2013-08-27 15:03:23 cg Exp $'
  9992 ! !
  9994 ! !
  9993 
  9995 
  9994 
  9996 
  9995 DialogBox initialize!
  9997 DialogBox initialize!