"

 COPYRIGHT (c) 1997 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

ResourceSpecEditor subclass:#DataSetBuilder

	instanceVariableNames:'rowClass rowSuperClass columnView columns selectedColumnIndex

		modalOpened'

	classVariableNames:''

	poolDictionaries:''

	category:'Interface-UIPainter'

!

!DataSetBuilder class methodsFor:'documentation'!

copyright

"

 COPYRIGHT (c) 1997 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

!

documentation

"

    create and modify or inspect dataset columns; used by UIPainter (DataSetColumnSpec)

    [see also:]

        DataSetColumnSpec

        DataSetSpec

        DataSetView

        DataSetColumn

    [author:]

        Claus Atzkern, eXept Software AG

"

! !

!DataSetBuilder class methodsFor:'accessing'!

resourceType

    "get the type of resource of the method generated by the MenuEditor"

    ^#tableColumns

! !

!DataSetBuilder class methodsFor:'aspects'!

aspects

    "get the aspects for the attributes of the table columns"

    ^#(

        id

        label

        canSelect

        choices

        editorType

        formatString

        labelIsImage

        translateLabel

        size

        type

        width

        minWidth

        height

        menu

        foregroundSelector

        backgroundSelector

        doubleClickedSelector

        rowSeparatorSelector

        selectSelector

        printSelector

        readSelector

        writeSelector

        rendererType

        showColSeparator

        showSelectionHighLighted

        showRowSeparator

        backgroundColor

        foregroundColor

        labelForegroundColor

        labelBackgroundColor

        labelFont

        labelActionSelector

        labelActionArgument

        labelAlignment

        columnAlignment

     )

    "Modified: / 19.5.1998 / 21:27:06 / cg"

! !

!DataSetBuilder class methodsFor:'help specs'!

helpSpec

    "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 helpSpec addPairsFrom:#(

#addColumn

'Adds a new column.'

#basicsEditor

'Default widget type or a selector returning an instance of a user defined widget opened in the cell.'

#basicsFont

'Sets the font of the label text.'

#basicsJustification

'Aligns the label text to the left, right, or centered in the cell.'

#basicsLabel

'The label of the column or a selector returning a string or an image.'

#basicsLabelIsImage

'Turns on/off image behavior of the label string; i.e. it is used as selector returning an image.'

#basicsRenderer

'Specifies displaying cell as Text, CheckToggle, ComboBox, ComboList or as a RowSelector.'

#browseRowClass

'Open a browser on the row class'

#colorsBackgroundCellColor

'Sets the background color of the column.'

#colorsBackgroundLabelColor

'Sets the background color of the label.'

#colorsBackgroundSelector

'Selector returning the background color for a cell (optional).'

#colorsForegroundCellColor

'Sets the foreground color of the column.'

#colorsForegroundLabelColor

'Sets the foreground color of the label.'

#colorsForegroundSelector

'Selector returning the foreground color for a cell (optional).'

#fileNew

'Discard changes and continue with a new, empty column description'

#fileLoad

'Specify class/selector and edit that column description'

#fileSave

'Install the column description'

#fileSaveAs

'Specify class/selector and install the column description'

#formatInputType

'A type converter symbol used by the input field.'

#formatMaxSize

'Maximum size of the string which can be typed in. 0 or nil means unlimited.'

#formatTextFormat

'Format string specifying the output format of the cell text. In this release, only numbers are supported (for example: 0.0000).'

#frameColumnWidth

'Width (fixed) of a column (optional).'

#frameMinWidth

'Minimum width of the column (optional).'

#frameRowHeight

'Height of the row (optional).'

#frameShowColumnSeparator

'Turns on/off displaying column separators.'

#frameShowRowSeparator

'Turns on/off displaying row separators.'

#frameShowRowSeparatorSelector

'An optional selector, which is used to test whether the row separator at the bottom is shown.'

#generate

'Code generation.'

#generateCode

'Generate code and install in the selected class/selector.'

#pickColumns

'Select an open view and readOut the column specification from it.'

#selectionCellClickSelector

'A selector called if cell was selected.'

#selectionCellDoubleClickSelector

'A selector called if cell was double clicked.'

#selectionCellSelector

'An optional selector, which is used to test whether the cell in the column is selectable; the ''Is Selectable'' flag must be enabled.'

#selectionIsSelectable

'Turns on/off selection behavior of a column.'

#selectionLabelClickSelector

'A selector called if label cell was clicked.'

#selectionLabelSelectorArgument

'An argument passed to label selection selector.'

#showSelectionHighLighted

'Show selected cell highligthened (change fg/bg color).'

#valuesChoiceSelector

'A selector returning a collection of choices for a cell having a ComboBox or a ComboList widget.'

#valuesMenuSelector

'A selector returning a middle button menu.'

#valuesPrintSelector

'A key selector used to register images on a DSVColumnView (the arg). For more detailed info see #register... methods in DSVColumnView.'

#valuesReadSelector

'A selector used to get (string or a bitmap) or set (if the write selector is undefined) the contents of a cell.'

#valuesWriteSelector

'A selector used to set the value of a cell.'

)

    "Modified: / 19.5.1998 / 23:20:51 / cg"

! !

!DataSetBuilder class methodsFor:'image specs'!

newColumnIcon

    "This resource specification was automatically generated

     by the ImageEditor of ST/X."

    "Do not manually edit this!! If it is corrupted,

     the ImageEditor may not be able to read the specification."

    "

     self newColumnIcon inspect

     ImageEditor openOnClass:self andSelector:#newColumnIcon

    "

    <resource: #image>

    ^Icon

        constantNamed:#'DataSetBuilder newColumnIcon'

        ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'UT@@@@UPUTUUUXUPUTZ**,UPUTZB",UPUTX*H,UYUTX*H,UPUTZB",UPQTZ**,UPUTX*H,UPUTX*H,UPUTX*H,UPUTXB@,UPUTZ**,UPUTZ**,UPUTX"H,UYUTXB@,UPUTX"@,UPUTX"H,UPUTZ**,UPUTZ**,UPUT/??<UPUT@@@@UP') ; colorMapFromArray:#[0 0 0 255 255 255 170 170 170 127 127 127]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A??@A??@A??@A??@A??@A??@A??@A??@A??CA??@A??@A??@A??@A??CA??AA??@A??CA??@A??CA??@A??@A??A') ; yourself); yourself]! !

!DataSetBuilder class methodsFor:'interface specs'!

basicsEditSpec

    "This resource specification was automatically generated

     by the UIPainter of ST/X."

    "Do not manually edit this!! If it is corrupted,

     the UIPainter may not be able to read the specification."

    "

     UIPainter new openOnClass:DataSetBuilder andSelector:#basicsEditSpec

     DataSetBuilder new openInterface:#basicsEditSpec

    "

    <resource: #canvas>

    ^

       #(#FullSpec

          #window: 

           #(#WindowSpec

              #name: 'DataSet Basic'

              #layout: #(#LayoutFrame 216 0 173 0 538 0 499 0)

              #label: 'DataSet Basic'

              #min: #(#Point 10 10)

              #max: #(#Point 1280 1024)

              #bounds: #(#Rectangle 216 173 539 500)

              #usePreferredExtent: false

          )

          #component: 

           #(#SpecCollection

              #collection: 

               #(

                 #(#FramedBoxSpec

                    #name: 'framedBox1'

                    #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 173 0)

                    #component: 

                     #(#SpecCollection

                        #collection: 

                         #(

                           #(#LabelSpec

                              #name: 'label1'

                              #layout: #(#AlignmentOrigin 94 0 39 0 1 0.5)

                              #label: 'Label:'

                              #resizeForLabel: true

                          )

                           #(#InputFieldSpec

                              #name: 'labelField'

                              #layout: #(#LayoutFrame 97 0 28 0 2 1.0 50 0)

                              #activeHelpKey: #basicsLabel

                              #tabable: true

                              #model: #label

                          )

                           #(#LabelSpec

                              #name: 'LabelFont'

                              #layout: #(#AlignmentOrigin 94 0 68 0 1 0.5)

                              #label: 'Font:'

                              #adjust: #left

                              #resizeForLabel: true

                          )

                           #(#FontMenuSpec

                              #name: 'fontMenu'

                              #layout: #(#LayoutFrame 97 0 56 0 0 1.0 78 0)

                              #activeHelpKey: #labelFont

                              #model: #style

                          )

                           #(#PopUpListSpec

                              #name: 'Alignment'

                              #layout: #(#LayoutFrame 142 0 85 0 2 1.0 107 0)

                              #activeHelpKey: #basicsJustification

                              #label: 'Alignment'

                              #model: #labelAlignment

                              #menu: 

                               #(#left

                                  #right #center

                              )

                              #useIndex: false

                          )

                           #(#LabelSpec

                              #name: 'JustificationLabel'

                              #layout: #(#AlignmentOrigin 140 0 96 0 1 0.5)

                              #label: 'Justification:'

                              #adjust: #left

                              #resizeForLabel: true

                          )

                           #(#CheckBoxSpec

                              #name: 'labelIsImage'

                              #layout: #(#LayoutOrigin -3 0 110 0)

                              #activeHelpKey: #basicsLabelIsImage

                              #tabable: true

                              #model: #labelIsImage

                              #label: 'Label Is Image'

                          )

                           #(#CheckBoxSpec

                              #name: 'CheckBox2'

                              #layout: #(#LayoutOrigin 142 0 110 0)

                              #activeHelpKey: #basicsLabelIsImage

                              #tabable: true

                              #model: #translateLabel

                              #label: 'Translate Label'

                          )

                           #(#LabelSpec

                              #name: 'idLabel'

                              #layout: #(#AlignmentOrigin 94 0 14 0 1 0.5)

                              #label: 'ID:'

                              #resizeForLabel: true

                          )

                           #(#InputFieldSpec

                              #name: 'idField'

                              #layout: #(#LayoutFrame 97 0 0 0 2 1.0 22 0)

                              #activeHelpKey: #basicsLabel

                              #tabable: true

                              #model: #id

                          )

                        )

                    )

                    #label: 'Header:'

                    #labelPosition: #topLeft

                )

                 #(#FramedBoxSpec

                    #name: 'typesFrame'

                    #layout: #(#LayoutFrame 0 0.0 178 0 0 1.0 286 0)

                    #component: 

                     #(#SpecCollection

                        #collection: 

                         #(

                           #(#LabelSpec

                              #name: 'rendererLabel'

                              #layout: #(#AlignmentOrigin 94 0 16 0 1 0.5)

                              #label: 'Renderer:'

                              #resizeForLabel: true

                          )

                           #(#ComboListSpec

                              #name: 'rendererField'

                              #layout: #(#LayoutFrame 97 0 5 0 2 1.0 27 0)

                              #activeHelpKey: #basicsRenderer

                              #tabable: true

                              #model: #rendererType

                              #comboList: #rendererTypeList

                              #useIndex: false

                          )

                           #(#LabelSpec

                              #name: 'editorLabel'

                              #layout: #(#AlignmentOrigin 94 0 42 0 1 0.5)

                              #label: 'Editor:'

                              #resizeForLabel: true

                          )

                           #(#ComboBoxSpec

                              #name: 'editorField'

                              #layout: #(#LayoutFrame 97 0 31 0 2 1.0 53 0)

                              #activeHelpKey: #basicsEditor

                              #tabable: true

                              #model: #editorType

                              #type: #symbolOrNil

                              #comboList: #editorTypeList

                              #useIndex: false

                          )

                           #(#LabelSpec

                              #name: 'JustificationC'

                              #layout: #(#AlignmentOrigin 140 0 69 0 1 0.5)

                              #label: 'Justification:'

                              #adjust: #left

                              #resizeForLabel: true

                          )

                           #(#PopUpListSpec

                              #name: 'AlignmentC'

                              #layout: #(#LayoutFrame 142 0 58 0 2 1.0 80 0)

                              #activeHelpKey: #basicsJustification

                              #label: 'Alignment'

                              #model: #columnAlignment

                              #menu: 

                               #(#left

                                  #right #center

                              )

                              #useIndex: false

                          )

                        )

                    )

                    #label: 'Cell Type:'

                    #labelPosition: #topLeft

                )

              )

          )

      )

    "Modified: / 13.8.1998 / 19:53:18 / cg"

!

colorsEditSpec

    "This resource specification was automatically generated

     by the UIPainter of ST/X."

    "Do not manually edit this!! If it is corrupted,

     the UIPainter may not be able to read the specification."

    "

     UIPainter new openOnClass:DataSetBuilder andSelector:#colorsEditSpec

     DataSetBuilder new openInterface:#colorsEditSpec

    "

    <resource: #canvas>

    ^

       #(#FullSpec