--- a/FilenameComboBoxView.st Thu Oct 18 14:56:25 2007 +0200
+++ b/FilenameComboBoxView.st Fri Oct 19 15:57:42 2007 +0200
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libwidg2' }"
ComboBoxView subclass:#FilenameComboBoxView
@@ -46,6 +45,24 @@
ComboBoxView
FilenameEditField
"
+!
+
+examples
+"
+ [exBegin]
+ |top b|
+
+ top := StandardSystemView new.
+ top extent:(300 @ 200).
+
+ b := FilenameComboBoxView in:top.
+ b origin:(0.0 @ 0.0) corner:(1.0 @ 0.0).
+ b bottomInset:(b preferredExtent y negated).
+
+ b list:#('c:\' 'd:\' 'c:\users').
+ top open.
+ [exEnd]
+"
! !
!FilenameComboBoxView methodsFor:'initialization'!
@@ -57,5 +74,5 @@
!FilenameComboBoxView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/FilenameComboBoxView.st,v 1.2 2002-07-03 12:26:54 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/FilenameComboBoxView.st,v 1.3 2007-10-19 13:57:42 cg Exp $'
! !