--- a/DataSetBuilder.st Wed Oct 20 14:18:44 2004 +0200
+++ b/DataSetBuilder.st Wed Oct 20 14:29:32 2004 +0200
@@ -138,6 +138,48 @@
!DataSetBuilder class methodsFor:'help specs'!
+flyByHelpSpec
+ "This resource specification was automatically generated
+ by the UIHelpTool of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIHelpTool may not be able to read the specification."
+
+ "
+ UIHelpTool openOnClass:DataSetBuilder
+ "
+
+ <resource: #help>
+
+ ^ super flyByHelpSpec addPairsFrom:#(
+
+#addColumn
+'Add a Column'
+
+#fileLoad
+'Load Column Description from Method'
+
+#fileNew
+'New Column Description'
+
+#fileSave
+'Save Column Description as Method'
+
+#fileSaveAs
+'Save Column Description as Method'
+
+#editCut
+'Cut Column'
+
+#editCopy
+'Copy Column'
+
+#editPaste
+'Paste Column'
+
+)
+!
+
helpSpec
"This resource specification was automatically generated
by the UIHelpTool of ST/X."
@@ -2113,7 +2155,7 @@
itemValue: doNew
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever ToolbarIconLibrary newDataSet24x24Icon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary newDataSetIcon)
)
(MenuItem
activeHelpKey: fileLoad
@@ -2122,19 +2164,18 @@
translateLabel: true
isButton: true
submenuChannel: menuHistory
- labelImage: (ResourceRetriever ToolbarIconLibrary load22x22Icon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary loadFromMethodIcon)
)
-
(MenuItem
activeHelpKey: fileSave
label: 'Save'
itemValue: doSave
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever ToolbarIconLibrary saveAsMethod22x22Icon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary saveAsMethodIcon)
)
(MenuItem
- label: ''
+ label: '-'
)
(MenuItem
activeHelpKey: editCut
@@ -2143,7 +2184,7 @@
itemValue: doCut
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever Icon cutIcon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary cutWidgetIcon)
)
(MenuItem
activeHelpKey: editCopy
@@ -2152,7 +2193,7 @@
itemValue: doCopy
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever Icon copyIcon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary copyWidgetIcon)
)
(MenuItem
activeHelpKey: editPaste
@@ -2161,7 +2202,7 @@
itemValue: doPaste
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever Icon pasteIcon)
+ labelImage: (ResourceRetriever ToolbarIconLibrary pasteWidgetIcon)
)
(MenuItem
activeHelpKey: editDelete
@@ -2170,10 +2211,11 @@
itemValue: doDelete
translateLabel: true
isButton: true
- labelImage: (ResourceRetriever Icon deleteIcon)
+ isVisible: false
+ labelImage: (ResourceRetriever ToolbarIconLibrary deleteWidgetIcon)
)
(MenuItem
- label: ''
+ label: '-'
)
(MenuItem
activeHelpKey: addColumn
@@ -2185,7 +2227,7 @@
labelImage: (ResourceRetriever nil newColumnIcon)
)
(MenuItem
- label: ''
+ label: '-'
)
(MenuItem
activeHelpKey: editMoveUp