equal
deleted
inserted
replaced
1165 ^ self |
1165 ^ self |
1166 confirm:aString |
1166 confirm:aString |
1167 title:(self classResources string:'Confirm') |
1167 title:(self classResources string:'Confirm') |
1168 yesLabel:nil |
1168 yesLabel:nil |
1169 noLabel:nil |
1169 noLabel:nil |
|
1170 initialAnswer:true |
1170 |
1171 |
1171 " |
1172 " |
1172 Dialog confirm:'really ?' |
1173 Dialog confirm:'really ?' |
1173 |
1174 |
1174 Transcript showCR:( |
1175 Transcript showCR:( |
1184 return true for yes, false for no. |
1185 return true for yes, false for no. |
1185 InitialAnswer must be true or false and defines which button is to be |
1186 InitialAnswer must be true or false and defines which button is to be |
1186 the default (i.e. return-) button" |
1187 the default (i.e. return-) button" |
1187 |
1188 |
1188 ^ self confirm:aString initialAnswer:what |
1189 ^ self confirm:aString initialAnswer:what |
|
1190 |
|
1191 " |
|
1192 Dialog confirm:'Are you happy' default:true |
|
1193 |
|
1194 Dialog confirm:'Are you happy' default:false |
|
1195 " |
1189 ! |
1196 ! |
1190 |
1197 |
1191 confirm:aString initialAnswer:what |
1198 confirm:aString initialAnswer:what |
1192 "launch a Dialog, which allows user to enter yes or no. |
1199 "launch a Dialog, which allows user to enter yes or no. |
1193 return true for yes, false for no. |
1200 return true for yes, false for no. |
7156 ! ! |
7163 ! ! |
7157 |
7164 |
7158 !DialogBox class methodsFor:'documentation'! |
7165 !DialogBox class methodsFor:'documentation'! |
7159 |
7166 |
7160 version |
7167 version |
7161 ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.174 2001-11-07 10:00:43 cg Exp $' |
7168 ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.175 2001-11-08 09:09:41 cg Exp $' |
7162 ! ! |
7169 ! ! |
7163 DialogBox initialize! |
7170 DialogBox initialize! |