#DOCUMENTATION by cg
class: EnterBox
comment/format in:
#title:
#title:okText:
#title:okText:abortText:
--- a/EnterBox.st Mon Jul 15 15:35:49 2019 +0200
+++ b/EnterBox.st Mon Jul 15 16:40:05 2019 +0200
@@ -434,7 +434,8 @@
!
title:aString
- "set the title to be displayed at top of the enterBox"
+ "set the title to be displayed at top of the enterBox.
+ This is NOT the window title."
|oldSize|
@@ -452,11 +453,12 @@
]
]
- "Modified (comment): / 26-08-2018 / 18:10:08 / Claus Gittinger"
+ "Modified (comment): / 15-07-2019 / 16:34:02 / Claus Gittinger"
!
title:titleString okText:okString
- "set title and text in okbutton"
+ "set title and text in okbutton.
+ This title is NOT the window title."
(titleString ~= labelField label or:[okString ~= okButton label]) ifTrue:[
okButton label:okString.
@@ -467,10 +469,13 @@
ifTrue:[self resize]
ifFalse:[ self sizeChanged:nil].
]
+
+ "Modified (comment): / 15-07-2019 / 16:34:12 / Claus Gittinger"
!
title:titleString okText:okString abortText:abortString
- "set title and texts in the buttons"
+ "set title and texts in the buttons.
+ This title is NOT the window title."
(titleString ~= labelField label
or:[okString ~= okButton label
@@ -485,6 +490,8 @@
ifTrue:[self resize]
ifFalse:[ self sizeChanged:nil].
]
+
+ "Modified (comment): / 15-07-2019 / 16:34:17 / Claus Gittinger"
! !
!EnterBox methodsFor:'change & update'!