--- a/FileBrowser.st Thu Sep 04 12:56:49 2003 +0200
+++ b/FileBrowser.st Thu Sep 04 20:57:09 2003 +0200
@@ -519,124 +519,120 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'File Search'
- #layout: #(#LayoutFrame 4 0 50 0 315 0 349 0)
- #level: 0
- #label: 'File Search'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 4 50 316 350)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'Label1'
- #layout: #(#LayoutFrame 0 0 10 0 0 1 32 0)
- #label: 'Search for files named:'
- #translateLabel: true
- #adjust: #left
- )
- #(#InputFieldSpec
- #name: 'EntryField1'
- #layout: #(#LayoutFrame 10 0 36 0 305 0 58 0)
- #tabable: true
- #model: #namePatternHolder
- )
- #(#CheckBoxSpec
- #name: 'CheckBox1'
- #layout: #(#LayoutFrame 7 0 66 0 143 0 88 0)
- #tabable: true
- #model: #ignoreCaseInName
- #label: 'Ignore case'
- #translateLabel: true
- )
- #(#LabelSpec
- #name: 'Label2'
- #layout: #(#LayoutFrame 0 0.0 107 0 0 1.0 129 0)
- #label: 'Containing the string:'
- #translateLabel: true
- #adjust: #left
- )
- #(#InputFieldSpec
- #name: 'EntryField2'
- #layout: #(#LayoutFrame 10 0 133 0 305 0 155 0)
- #enableChannel: #notSearchForSameContents
- #tabable: true
- #model: #contentsPatternHolder
- )
- #(#CheckBoxSpec
- #name: 'CheckBox2'
- #layout: #(#LayoutFrame 6 0 163 0 142 0 185 0)
- #enableChannel: #notSearchForSameContents
- #tabable: true
- #model: #ignoreCaseInContents
- #label: 'Ignore case'
- #translateLabel: true
- )
- #(#LabelSpec
- #name: 'Label3'
- #layout: #(#LayoutFrame 0 0.0 223 0 -30 1.0 245 0)
- #label: 'Containing same contents as selected:'
- #translateLabel: true
- #adjust: #left
- )
- #(#DividerSpec
- #name: 'Separator1'
- #layout: #(#LayoutFrame 0 0.0 97 0 0 1.0 101 0)
- )
- #(#CheckToggleSpec
- #name: 'CheckToggle1'
- #layout: #(#LayoutOrigin -25 1 225 0)
- #tabable: true
- #model: #searchForSameContents
- #enableChannel: #searchForSameContentsEnabled
- #isTriggerOnDown: true
- #showLamp: false
- #lampColor: #(#Color 100.0 100.0 0.0)
- )
- #(#HorizontalPanelViewSpec
- #name: 'HorizontalPanel1'
- #layout: #(#LayoutFrame 0 0.0 -30 1 0 1.0 0 1.0)
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#ActionButtonSpec
- #name: 'Button1'
- #label: 'Cancel'
- #translateLabel: true
- #tabable: true
- #model: #cancel
- #extent: #(#Point 151 25)
- )
- #(#ActionButtonSpec
- #name: 'Button2'
- #label: 'Search'
- #translateLabel: true
- #tabable: true
- #model: #accept
- #isDefault: true
- #extent: #(#Point 152 25)
- )
- )
- )
- #horizontalLayout: #fitSpace
- #verticalLayout: #centerMax
- #horizontalSpace: 3
- #verticalSpace: 3
- )
+ ^
+ #(FullSpec
+ name: fileSearchDialogSpec
+ window:
+ (WindowSpec
+ label: 'File Search'
+ name: 'File Search'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 326 346)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Search for files named:'
+ name: 'Label1'
+ layout: (LayoutFrame 0 0 10 0 0 1 32 0)
+ translateLabel: true
+ adjust: left
+ )
+ (InputFieldSpec
+ name: 'EntryField1'
+ layout: (LayoutFrame 10 0 36 0 305 0 58 0)
+ tabable: true
+ model: namePatternHolder
+ acceptOnPointerLeave: false
+ )
+ (CheckBoxSpec
+ label: 'Ignore case'
+ name: 'CheckBox1'
+ layout: (LayoutFrame 7 0 66 0 143 0 88 0)
+ tabable: true
+ model: ignoreCaseInName
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Containing the string:'
+ name: 'Label2'
+ layout: (LayoutFrame 0 0.0 107 0 0 1.0 129 0)
+ translateLabel: true
+ adjust: left
+ )
+ (InputFieldSpec
+ name: 'EntryField2'
+ layout: (LayoutFrame 10 0 133 0 305 0 155 0)
+ enableChannel: notSearchForSameContents
+ tabable: true
+ model: contentsPatternHolder
+ acceptOnPointerLeave: false
+ )
+ (CheckBoxSpec
+ label: 'Ignore case'
+ name: 'CheckBox2'
+ layout: (LayoutFrame 6 0 163 0 142 0 185 0)
+ enableChannel: notSearchForSameContents
+ tabable: true
+ model: ignoreCaseInContents
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Containing same contents as selected:'
+ name: 'Label3'
+ layout: (LayoutFrame 0 0.0 223 0 -30 1.0 245 0)
+ translateLabel: true
+ adjust: left
+ )
+ (DividerSpec
+ name: 'Separator1'
+ layout: (LayoutFrame 0 0.0 97 0 0 1.0 101 0)
+ )
+ (CheckToggleSpec
+ name: 'CheckToggle1'
+ layout: (LayoutOrigin -25 1 225 0)
+ tabable: true
+ model: searchForSameContents
+ enableChannel: searchForSameContentsEnabled
+ isTriggerOnDown: true
+ showLamp: false
+ lampColor: (Color 100.0 100.0 0.0)
+ )
+ (HorizontalPanelViewSpec
+ name: 'HorizontalPanel1'
+ layout: (LayoutFrame 0 0.0 -30 1 0 1.0 0 1.0)
+ horizontalLayout: fitSpace
+ verticalLayout: centerMax
+ horizontalSpace: 3
+ verticalSpace: 3
+ component:
+ (SpecCollection
+ collection: (
+ (ActionButtonSpec
+ label: 'Cancel'
+ name: 'Button1'
+ translateLabel: true
+ tabable: true
+ model: cancel
+ extent: (Point 151 25)
+ )
+ (ActionButtonSpec
+ label: 'Search'
+ name: 'Button2'
+ translateLabel: true
+ tabable: true
+ model: accept
+ isDefault: true
+ extent: (Point 152 25)
+ )
+ )
+
)
- )
+ )
+ )
+
+ )
)
! !
@@ -7852,5 +7848,5 @@
!FileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.543 2003-08-28 11:23:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.544 2003-09-04 18:56:43 stefan Exp $'
! !