equal
deleted
inserted
replaced
19 |
19 |
20 WarningBox comment:' |
20 WarningBox comment:' |
21 COPYRIGHT (c) 1993 by Claus Gittinger |
21 COPYRIGHT (c) 1993 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.5 1994-10-10 03:03:26 claus Exp $ |
24 $Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.6 1994-11-17 14:38:53 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !WarningBox class methodsFor:'documentation'! |
27 !WarningBox class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.5 1994-10-10 03:03:26 claus Exp $ |
45 $Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.6 1994-11-17 14:38:53 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
62 |
62 |
63 The default box shows 'yes' in its button; this can be changed with: |
63 The default box shows 'yes' in its button; this can be changed with: |
64 |
64 |
65 aBox okText:'some string'. |
65 aBox okText:'some string'. |
66 |
66 |
|
67 " |
|
68 ! |
67 |
69 |
|
70 examples |
|
71 " |
68 Examples: |
72 Examples: |
69 |
73 |
70 |aBox| |
74 |aBox| |
71 |
75 |
72 aBox := WarningBox title:'Press ''OK'' to continue'. |
76 aBox := WarningBox title:'Press ''OK'' to continue'. |