--- a/DataSetBuilder.st Fri Jul 04 18:47:41 2003 +0200
+++ b/DataSetBuilder.st Wed Jul 16 15:32:40 2003 +0200
@@ -111,6 +111,7 @@
printSelector
readSelector
writeSelector
+ visibilitySelector
rendererType
showColSeparator
showSelectionHighLighted
@@ -144,7 +145,7 @@
<resource: #help>
- ^super helpSpec addPairsFrom:#(
+ ^ super helpSpec addPairsFrom:#(
#addColumn
'Adds a new column.'
@@ -285,7 +286,10 @@
'Selector used to register images on a DSVColumnView (the arg). For more detailed info see #register... methods in DSVColumnView.'
#valuesReadSelector
-'Selector returning the label to be displayed(string, bitmap or a collection).'
+'Selector returning the label to be displayed (string, bitmap or a collection).'
+
+#valuesVisibilitySelector
+'Boolean message selector controlling the columns visibility.'
#valuesWriteSelector
'Selector used to set the value derived from the editor.'
@@ -1258,7 +1262,7 @@
#name: 'DataSet Basic'
#min: #(#Point 10 10)
#max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 13 23 309 329)
+ #bounds: #(#Rectangle 16 42 312 356)
)
#component:
#(#SpecCollection
@@ -1266,7 +1270,7 @@
#(#FramedBoxSpec
#label: 'Value Selectors:'
#name: 'valuesBox'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 138 0)
+ #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 160 0)
#labelPosition: #topLeft
#component:
#(#SpecCollection
@@ -1279,10 +1283,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'readSelector'
#layout: #(#LayoutFrame 97 0 4 0 2 1.0 26 0)
#activeHelpKey: #valuesReadSelector
@@ -1303,10 +1303,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'writeSelector'
#layout: #(#LayoutFrame 97 0 29 0 2 1.0 51 0)
#activeHelpKey: #valuesWriteSelector
@@ -1327,10 +1323,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'converterField'
#layout: #(#LayoutFrame 97 0 54 0 2 1.0 76 0)
#activeHelpKey: #converterSelector
@@ -1351,10 +1343,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'printSelector'
#layout: #(#LayoutFrame 97 0 79 0 2 1.0 101 0)
#activeHelpKey: #valuesPrintSelector
@@ -1367,6 +1355,26 @@
#modifiedChannel: #modifiedChannel
#acceptOnPointerLeave: false
)
+ #(#LabelSpec
+ #label: 'Visibility:'
+ #name: 'visibilityLabel'
+ #layout: #(#AlignmentOrigin 94 0 115 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'visibilitySelector'
+ #layout: #(#LayoutFrame 97 0 104 0 2 1.0 126 0)
+ #activeHelpKey: #valuesVisibilitySelector
+ #tabable: true
+ #model: #visibilitySelector
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
)
)
@@ -1374,7 +1382,7 @@
#(#FramedBoxSpec
#label: 'Menu:'
#name: 'menusBox'
- #layout: #(#LayoutFrame 0 0.0 143 0 0 1.0 200 0)
+ #layout: #(#LayoutFrame 0 0.0 161 0 0 1.0 218 0)
#labelPosition: #topLeft
#component:
#(#SpecCollection
@@ -1387,10 +1395,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'menuSelector'
#layout: #(#LayoutFrame 97 0 1 0 2 1.0 23 0)
#activeHelpKey: #valuesMenuSelector
@@ -1410,7 +1414,7 @@
#(#FramedBoxSpec
#label: 'Combo List/Box Selectors:'
#name: 'framedBox1'
- #layout: #(#LayoutFrame 1 0.0 205 0 1 1.0 293 0)
+ #layout: #(#LayoutFrame 1 0.0 223 0 1 1.0 311 0)
#labelPosition: #topLeft
#component:
#(#SpecCollection
@@ -1424,10 +1428,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'ChoicesField'
#layout: #(#LayoutFrame 97 0 4 0 2 1.0 26 0)
#activeHelpKey: #valuesChoiceSelector
@@ -1450,10 +1450,6 @@
#adjust: #right
)
#(#InputFieldSpec
- #attributes:
- #(#tabable
- true
- )
#name: 'ShowInputFieldField'
#layout: #(#LayoutFrame 97 0 30 0 2 1.0 52 0)
#activeHelpKey: #showComboFieldSelector
@@ -1475,8 +1471,6 @@
)
)
-
- "Modified: / 30.1.2000 / 02:39:03 / cg"
!
windowSpec
@@ -2600,7 +2594,8 @@
previewColumns add:(aCol copy)
].
previewColumns keysAndValuesDo:[:anIndex :column|
- column readSelector: #at:;
+ column
+ readSelector: #at:;
writeSelector: #at:put:;
backgroundSelector:nil;
foregroundSelector:nil;
@@ -2610,6 +2605,7 @@
selectSelector: nil;
doubleClickedSelector: nil;
printSelector: nil;
+ visibilitySelector: nil;
menu: nil;
labelActionSelector:#labelInPreviewPressed:;
labelActionArgument:anIndex;
@@ -2779,7 +2775,9 @@
type := (aspects at:#rendererType) value.
type == #rowSelector ifTrue:[
- #(label width minWidth usePreferredWidth editorType choices readSelector writeSelector printSelector
+ #(label
+ width minWidth usePreferredWidth editorType choices
+ readSelector writeSelector printSelector visibilitySelector
formatString type converterSelector size height canSelect selectSelector showComboFieldSelector
) do:[:aKey|
(aspects at:aKey) value:nil
@@ -2792,7 +2790,6 @@
self updateColumnView.
self cancel.
modified := true.
-
!
cancel