UISpecificationTool.st
author ca
Wed, 26 Jan 2000 10:47:50 +0100
changeset 1308 e0bf7aae9c51
parent 1307 52898ecde37d
child 1313 95ef9b917d82
permissions -rw-r--r--
keyboardForwarder: delegate no #Tab
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     1
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     2
 COPYRIGHT (c) 1995 by eXept Software AG
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     3
              All Rights Reserved
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     4
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     5
 This software is furnished under a license and may be used
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    10
 hereby transferred.
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    11
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    12
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    13
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    14
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    15
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    16
ApplicationModel subclass:#UISpecificationTool
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
    17
	instanceVariableNames:'modifiedHolder aspects specification selection specChannel
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    18
		buildInView listOfSpecViews'
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    19
	classVariableNames:''
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    20
	poolDictionaries:''
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    21
	category:'Interface-UIPainter'
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    22
!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    23
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    24
ViewScroller subclass:#BuildInView
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    25
	instanceVariableNames:'outerFrame'
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    26
	classVariableNames:''
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    27
	poolDictionaries:''
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    28
	privateIn:UISpecificationTool
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    29
!
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
    30
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    31
!UISpecificationTool class methodsFor:'documentation'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    32
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    33
copyright
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    34
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    35
 COPYRIGHT (c) 1995 by eXept Software AG
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    36
              All Rights Reserved
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    37
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    38
 This software is furnished under a license and may be used
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    39
 only in accordance with the terms of that license and with the
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    40
 inclusion of the above copyright notice.   This software may not
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    41
 be provided or otherwise made available to, or used by, any
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    42
 other person.  No title to or ownership of the software is
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    43
 hereby transferred.
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    44
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    45
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    46
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    47
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    48
!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    49
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    50
documentation
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    51
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    52
    used by the UIPainter to manipulate the specifications of the selected component
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    53
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    54
    [author:]
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    55
        Claus Atzkern
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    56
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    57
    [see also:]
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    58
        UIPainter
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    59
        UILayoutTool
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    60
        UIHelpTool
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    61
"
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    62
! !
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
    63
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
    64
!UISpecificationTool class methodsFor:'help specs'!
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
    65
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
    66
helpSpec
752
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    67
    "This resource specification was automatically generated
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    68
     by the UIHelpTool of ST/X."
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    69
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    70
    "Do not manually edit this!! If it is corrupted,
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    71
     the UIHelpTool may not be able to read the specification."
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
    72
847
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
    73
    "
752
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    74
     UIHelpTool openOnClass:UISpecificationTool    
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
    75
    "
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
    76
752
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    77
    <resource: #help>
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    78
2dc82cdfdd90 help texts
tz
parents: 610
diff changeset
    79
    ^super helpSpec addPairsFrom:#(
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
    80
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
    81
#acceptChannel
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
    82
'Aspect selector or binding for accepting the entry.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
    83
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    84
#acceptImmediate
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
    85
'Enable sending of the entered string to the model with every key press.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    86
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    87
#acceptOnLeave
1153
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
    88
'Enable sending of the entered string to the model when field is left via a keyboard action.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    89
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
    90
#acceptOnLostFocus
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
    91
'Enable sending of the entered string to the model when the field looses its input focus.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
    92
1153
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
    93
#acceptOnPointerLeaveFocus
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
    94
'Enable sending of the entered string to the model when field is left via a mouse motion.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
    95
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    96
#acceptOnReturn
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
    97
'Enable sending of the entered string to the model when the RETURN key is pressed.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    98
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
    99
#acceptOnTab
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   100
'Enable sending of the entered string to the model when the TAB key is pressed.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   101
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   102
#action
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   103
'Name of the message sent to the application when the widget is activated.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   104
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   105
#actionArg
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   106
'Optional argument passed with the action message.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   107
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   108
#appletParamText
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   109
'Paste the complete appletTAGs HTML text here (i.e. all from <applet> up to and including the </applet>). Press parse to extract all parameters from it.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   110
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   111
#appletTextParse
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   112
'Parse the appletTAG and fill the parameters directory from it.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   113
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   114
#arbitraryView
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   115
'The name of the message sent to the application to provide the view instance.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   116
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   117
#archiveEntry
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   118
'The name of a zip-file archive, if the class(es) are to be loaded from a zip-archive.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   119
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   120
#arrowButtonDirection
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   121
'Defines the direction of the arrow.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   122
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   123
#autoRepeat
1154
0febd9497fe1 help string
Claus Gittinger <cg@exept.de>
parents: 1153
diff changeset
   124
'Enable auto-repeat of the action as long as the button is pressed (Must be Trigger-on-Down).'
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   125
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   126
#backgroundChannel
1165
40ffba106cde help texts
Claus Gittinger <cg@exept.de>
parents: 1164
diff changeset
   127
'Aspect selector or binding for a background color holder.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   128
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   129
#backgroundColor
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   130
'Defines the background color of the widget.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   131
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   132
#beDefault
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   133
'Show a default (-return) bitmap after the label.'
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   134
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   135
#beDependentOfRows
1164
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   136
'Make the widget dependent on each row (ie rows send change messages).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   137
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   138
#booleanHolder
837
51876d557fed help texts
Claus Gittinger <cg@exept.de>
parents: 801
diff changeset
   139
'Aspect selector or binding for a boolean holder which enables the widget.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   140
1166
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   141
#booleanModel
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   142
'Aspect selector or binding for a holder on the boolean state.'
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   143
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   144
#borderWidth
783
06d23b8b66bd help texts
tz
parents: 780
diff changeset
   145
'Defines the width of the border (in pixels).'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   146
1166
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   147
#buttonModelArg
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   148
'Value stored into the model when the button is pressed.'
ee8ff9acf223 help texts
Claus Gittinger <cg@exept.de>
parents: 1165
diff changeset
   149
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   150
#canvas
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   151
'Aspect selector or binding for the widget placed into the notebook.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   152
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   153
#canvasArgument
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   154
'An optional argument passed with the message.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   155
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   156
#canvasSelector
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   157
'The name of the message sent to the application after opening the canvas.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   158
1153
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   159
#chartHolder
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   160
'Value holder on a chart description.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   161
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   162
#chartLabel
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   163
'Label string shown with the chart.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   164
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   165
#clientHolder
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   166
'Aspect selector or binding for a holder on the client application to be opened.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   167
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   168
#clientKey
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   169
'Name of the message which returns an application. By default the application itself is used.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   170
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   171
#codeBaseHolder
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   172
'The URL of the directory, where the classFile-file resides. If the classFile is located on the local machine, use\     file:/<fullPath>\ where fullPath is an absolute pathname. If its to be accessed via http, use\     http:/<host>/<relativePath>\ where relativePath is the path relative to the http''s top diretory on that host.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   173
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   174
#codeFileEntry
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   175
'The name of the java classFile which contains the applets code. For example: ''ArcTest.class'''
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   176
1164
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   177
#columnAdaptor
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   178
'Name of a method in the application which returns a column adaptor.'
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   179
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   180
#columnButton
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   181
'Opens a Table Columns Builder.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   182
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   183
#columnHolder
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   184
'Aspect selector or binding for a holder on the list of the column descriptions.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   185
1176
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   186
#componentsChangeSize
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   187
'Recompute layout when any component changes its size.'
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   188
1165
40ffba106cde help texts
Claus Gittinger <cg@exept.de>
parents: 1164
diff changeset
   189
#converter
40ffba106cde help texts
Claus Gittinger <cg@exept.de>
parents: 1164
diff changeset
   190
'Method in the application returning a typeconverter.'
847
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   191
1176
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   192
#dblClickChannel
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   193
'Aspect selector or binding for a holder on the double-clicked item.'
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   194
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   195
#defaultLabel
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   196
'Default label (used, if nothing selected).'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   197
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   198
#document
855
07344de4bed4 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 847
diff changeset
   199
'Aspect selector or binding for a holder of the URL of the document.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   200
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   201
#doubleClickSelector
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   202
'Message sent to the application upon double click.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   203
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   204
#downAction
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   205
'Name of the message sent to the application when the down(right)-button is pressed.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   206
1157
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   207
#dragDisplayObjects
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   208
'Message with one argument the DropSource, to get the list of Objects displayed during dragging'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   209
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   210
#dragDropObjects
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   211
'Message with one argument the DropSource, to get the list of DropObjects'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   212
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   213
#dragFeedBack
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   214
'Optional Message with one argument, the DropContext, to give a feedBack of the finished operation'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   215
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   216
#dragStart
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   217
'Optional Message with two arguments, the DropSource and the view, called to start your own handler'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   218
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   219
#dragStartArgument
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   220
'Optional user defined argument stored in the DropSource'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   221
1190
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   222
#drawBoxChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   223
'Boolean aspect which controls box-display.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   224
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   225
#drawNormalsChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   226
'Boolean aspect which controls normals-display.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   227
1157
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   228
#dropArgument
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   229
'Optional user defined argument stored in the DropTarget'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   230
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   231
#dropCanCheck
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   232
'Message with one argument, the DropContext, to asked if the context could be dropped'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   233
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   234
#dropEnter
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   235
'Optional Message with one argument, the DropContext, send the first time when entering the widget'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   236
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   237
#dropLeave
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   238
'Optional Message with one argument, the DropContext, send the last time when leaving the widget'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   239
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   240
#dropOver
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   241
'Optional Message with one argument, the DropContext, send all the time when moveing over the widget'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   242
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   243
#dropSelector
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   244
'Message with one argument, the DropContext, to drop the collection of objects'
cc039cdcc145 add help text to the drag & drop operation
Claus Gittinger <cg@exept.de>
parents: 1154
diff changeset
   245
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   246
#enableChannel
837
51876d557fed help texts
Claus Gittinger <cg@exept.de>
parents: 801
diff changeset
   247
'Aspect selector or binding for a boolean holder which enables the widget.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   248
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   249
#endMotionCallBack
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   250
'Method invoked with end of thumb motion.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   251
1051
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   252
#escapeIsCancelInDialog
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   253
'If on, and the window is opened modal, the ESC-Key acts like a Cancel-action'
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   254
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   255
#fileSelectionFilterClas
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   256
'The name of the item class used to create the entries into the hierarchical list.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   257
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   258
#fileSelectionTreeRoot
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   259
'Aspect selector or binding for a holder on the root directories path name.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   260
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   261
#fitLastRow
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   262
'Resize the last row to fit the width of the widget.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   263
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   264
#fontMenu
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   265
'Defines the font used by the widget.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   266
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   267
#forceRecursiveBackground
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   268
'If on, the background color is recursively set in all sub components.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   269
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   270
#foregroundChannel
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   271
'Aspect selector or binding for a foreground color holder.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   272
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   273
#foregroundColor
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   274
'Defines the foreground color of the widget.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   275
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   276
#galleryLabels
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   277
'Aspect selector or binding for a holder on the label list.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   278
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   279
#galleryModel
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   280
'Aspect selector or binding for the selected label.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   281
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   282
#gallerySelection
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   283
'Aspect selector or binding for a holder which gets the windowSpec of the selected widget.'
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   284
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   285
#gallerySelectors
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   286
'Name of the message sent to the application returning a list of resource spec selectors.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   287
1190
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   288
#glxGraphXMax
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   289
'range end x'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   290
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   291
#glxGraphXMin
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   292
'range start x'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   293
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   294
#glxGraphXStep
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   295
'range step x'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   296
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   297
#glxGraphYMax
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   298
'range end y'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   299
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   300
#glxGraphYMin
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   301
'range start y'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   302
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   303
#glxGraphYStep
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   304
'range step y'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   305
1164
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   306
#has3Dseparators
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   307
'Enable 3D-look row/column separators.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   308
1082
e0aa632c4016 help texts
Claus Gittinger <cg@exept.de>
parents: 1071
diff changeset
   309
#hasBorder
e0aa632c4016 help texts
Claus Gittinger <cg@exept.de>
parents: 1071
diff changeset
   310
'Draw a border around the widget - ignored in 3D view styles (ST80 compatibility).'
e0aa632c4016 help texts
Claus Gittinger <cg@exept.de>
parents: 1071
diff changeset
   311
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   312
#hierarchicalList
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   313
'Aspect selector or binding for a root item holder.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   314
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   315
#hierarchicalListButton
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   316
'Opens a Hierarchical List Editor on the application class and the defined selector.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   317
1153
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   318
#highlightMode
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   319
'Defines how selected items are highlighted'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   320
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   321
#horizontalLayout
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   322
'Defines how sub components are arranged horizontally.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   323
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   324
#horizontalMiniScroller
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   325
'Use a mini-scroller as horizontal scrollbar.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   326
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   327
#horizontalScroller
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   328
'Enable horizontal scrollability.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   329
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   330
#horizontalSpace
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   331
'Horizontal space between sub components (in pixels).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   332
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   333
#id
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   334
'Unique symbolic name (ID) of the widget.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   335
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   336
#initiallyDisabled
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   337
'Widget is initially disabled.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   338
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   339
#initiallyInvisible
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   340
'Widget is initially invisible.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   341
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   342
#inputFieldGroup
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   343
'Unique symbolic name (ID) for the group of the entry field.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   344
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   345
#isMultiSelect
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   346
'Enable/disable multiple selections.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   347
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   348
#isOpaque
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   349
'If on, the widget is displayed opaque; if off, its transparent.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   350
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   351
#isTriggerOnDown
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   352
'If on, the button triggers its action when pressed. If off, it triggers on release.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   353
1153
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   354
#itemChildrenSelector
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   355
'Method in the application to return a block retrieveing nodes (lazy) children.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   356
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   357
#itemContentsSelector
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   358
'Method in the application to return a block retrieveing a nodes (lazy) contents.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   359
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   360
#itemIconSelector
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   361
'Method in the application to return a block retrieveing nodes (lazy) icon.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   362
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   363
#itemLabelSelector
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   364
'Method in the application to return a block retrieveing nodes (lazy) label.'
587a2e40cbfc checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1082
diff changeset
   365
1181
074051c3fb70 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1176
diff changeset
   366
#keepCanvasAlive
074051c3fb70 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1176
diff changeset
   367
'If on, the view is unmapped when switching; otherwise, its destroyed.'
074051c3fb70 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1176
diff changeset
   368
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   369
#keyboardStep
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   370
'Defines the step used with cursor keys.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   371
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   372
#label
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   373
'The label of the widget.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   374
1176
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   375
#labelAlignment
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   376
'Specifies how the labels logo is positioned within the Label.'
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   377
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   378
#labelChannel
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   379
'Aspect selector or binding for a labelString holder.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   380
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   381
#labelIsImage
837
51876d557fed help texts
Claus Gittinger <cg@exept.de>
parents: 801
diff changeset
   382
'Label is actually the selector if a message providing an image-label.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   383
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   384
#labelPositionList
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   385
'Defines the position of the label.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   386
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   387
#lampColor
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   388
'Defines the lamps color.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   389
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   390
#level
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   391
'Level of the 3D-border (in pixels); Take widgets default, if left empty.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   392
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   393
#listHolder
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   394
'Aspect selector or binding for the list holder.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   395
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   396
#majorKey
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   397
'Name of the class which provides the window spec. If empty, the application itself is used.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   398
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   399
#maxChars
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   400
'Maximum number of characters in the field.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   401
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   402
#maxSize
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   403
'Those two fields specify the windows maximum size. The user will not be allowed to resize it to a larger size.'
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   404
847
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   405
#maxValue
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   406
'An optional maximum value (if fieldType = numberInRange)'
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   407
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   408
#maxXField
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   409
'The maximum width of the applications topWindow.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   410
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   411
#maxYField
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   412
'The maximum height of the applications topWindow.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   413
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   414
#menuButton
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   415
'Open a Menu Editor on the menu.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   416
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   417
#menuId
1051
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   418
'Aspect selector or binding providing the menu spec.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   419
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   420
#menuPerformer
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   421
'Aspect selector or binding providing the receiver of menu messages.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   422
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   423
#middleButtonPressed
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   424
'Name of the message sent to the application when the middle button is pressed.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   425
847
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   426
#minValue
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   427
'An optional minimum value (if fieldType = numberInRange)'
15f688710007 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 845
diff changeset
   428
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   429
#minXField
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   430
'The minimum width of the applications topWindow.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   431
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   432
#minYField
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   433
'The minimum height of the applications topWindow.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   434
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   435
#minorKey
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   436
'Name of the message sent to the application returning the window specification.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   437
1162
970f5b2204fe help texts
Claus Gittinger <cg@exept.de>
parents: 1161
diff changeset
   438
#model
970f5b2204fe help texts
Claus Gittinger <cg@exept.de>
parents: 1161
diff changeset
   439
'Aspect selector or binding providing the model of the widget.'
970f5b2204fe help texts
Claus Gittinger <cg@exept.de>
parents: 1161
diff changeset
   440
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   441
#modifiedChannel
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   442
'Aspect selector or binding for a holder for the modified-flag.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   443
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   444
#monitoring
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   445
'Enable automatic update whenever the directory is modified.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   446
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   447
#monitoringDelayTime
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   448
'Time in seconds between updates (if monitoring is enabled).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   449
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   450
#moveSelectedRow
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   451
'Enable/disable automatic movement of the row containing the selected tab item.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   452
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   453
#oneTabPerLine
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   454
'Arrange tabs vertically, with only one tab item per row.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   455
610
c6dc33689c6a Add help for subSpec GUI Painter opening.
Stefan Vogel <sv@exept.de>
parents: 584
diff changeset
   456
#openSubSpecGuiHelp
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   457
'Opens a GUI Builder on the defined class and selector.'
610
c6dc33689c6a Add help for subSpec GUI Painter opening.
Stefan Vogel <sv@exept.de>
parents: 584
diff changeset
   458
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   459
#orientation
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   460
'Defines the orientation (horizontal or vertical).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   461
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   462
#paramAdd
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   463
'Adds a name-value pair to the appletParameter collection.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   464
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   465
#paramList
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   466
'Lists defined parameters.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   467
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   468
#paramNameField
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   469
'The name of the appletParameter.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   470
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   471
#paramRemove
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   472
'Removes that appletParameter.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   473
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   474
#paramValueField
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   475
'The value of the appletParameter.'
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   476
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   477
#progressValueHolder
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   478
'Aspect selector or binding for a holder on the indicators value.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   479
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   480
#radioButtonGroup
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   481
'Aspect selector or binding providing the radioButton group-model.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   482
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   483
#radioButtonValue
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   484
'Value passed to the radioButton group-model.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   485
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   486
#readOnly
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   487
'Make the contents be readOnly.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   488
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   489
#regionType
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   490
'Defines the shape of the widget.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   491
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   492
#resizeForLabel
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   493
'Enable/disable automatic resize after a label change.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   494
1051
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   495
#returnIsOKInDialog
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   496
'If on, and the window is opened modal, the Return/Enter-Key acts like an Accept-action'
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   497
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   498
#rowIfAbsent
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   499
'Name of the message sent to the application when an empty list entry is detected.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   500
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   501
#scrollerValueHolder
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   502
'Aspect selector or binding for a holder on the scrollers value.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   503
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   504
#selectConditionSelector
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   505
'Message sent to the application to validate a selection (not selectable if false is returned).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   506
1164
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   507
#selectRowOnDefault
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   508
'Select whole row, if unselectable column is selected.'
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   509
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   510
#selectionHolder
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   511
'Aspect selector or binding for a holder on the selection.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   512
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   513
#setMaxExtent
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   514
'Pick the maximum extent from the canvases current extent.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   515
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   516
#setMinExtent
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   517
'Pick the minimum extent from the canvases current extent.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   518
1190
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   519
#showBox
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   520
'Display a bounding box.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   521
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   522
#showDirectoryIndicator
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   523
'Show/hide directory indicators for non-empty directories.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   524
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   525
#showDirectoryIndicatorForRoot
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   526
'Show/hide the directory indicator for the root item.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   527
1164
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   528
#showLabels
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   529
'Show/hide column labels.'
b56fe337f2ea help texts
Claus Gittinger <cg@exept.de>
parents: 1163
diff changeset
   530
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   531
#showLamp
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   532
'Show/hide the colored lamp.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   533
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   534
#showLines
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   535
'Show/hide connecting lines between tree items.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   536
1190
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   537
#showNormals
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   538
'Display normals.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   539
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   540
#showPercentage
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   541
'Show/hide the percentage display.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   542
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   543
#showRoot
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   544
'Show/hide the root item.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   545
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   546
#showSeparatingLines
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   547
'Show/hide separated lines.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   548
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   549
#sizeAsDefault
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   550
'Size the widget to include space for the default-(return) bitmap.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   551
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   552
#sliderValueHolder
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   553
'Aspect selector or binding for a holder on the sliders value.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   554
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   555
#specHolder
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   556
'Aspect selector or binding for holding the selector returning a window specification.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   557
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   558
#start
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   559
'Defines the ranges minimum.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   560
1161
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   561
#startMotionCallBack
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   562
'Method invoked with start of thumb motion.'
1b141606c286 help texts
Claus Gittinger <cg@exept.de>
parents: 1159
diff changeset
   563
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   564
#step
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   565
'Defines the step within the range.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   566
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   567
#stop
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   568
'Defines the ranges maximum.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   569
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   570
#supportsExpandAll
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   571
'Enable/disable the expand-all function'
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   572
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   573
#tabLabels
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   574
'Name of the message sent to the application returning a list of labels for the tab items.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   575
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   576
#tabOrientation
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   577
'Defines the side for the arrangement of the tab items.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   578
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   579
#tabWidget
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   580
'Defines the type of the border style of the tab items (Windows style vs. Mac style).'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   581
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   582
#tabable
837
51876d557fed help texts
Claus Gittinger <cg@exept.de>
parents: 801
diff changeset
   583
'Widget can be reached by pressing the TAB key.'
540
cf67668c680c help texts
Claus Gittinger <cg@exept.de>
parents: 536
diff changeset
   584
1176
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   585
#tabbedOverEndAction
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   586
'Method invoked when the end was reached by tabbing.'
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   587
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   588
#tabbedOverStartAction
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   589
'Method invoked when the beginning was reached by tabbing.'
d74bb0388a1e help text
Claus Gittinger <cg@exept.de>
parents: 1166
diff changeset
   590
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   591
#translateLabel
837
51876d557fed help texts
Claus Gittinger <cg@exept.de>
parents: 801
diff changeset
   592
'Translate the label via the resource mechanism to a national language string.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   593
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   594
#typeConverter
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   595
'Defines how the entry string is converted to an object which is passed to the model.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   596
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   597
#upAction
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   598
'Name of the message sent to the application when the up(left)-button is pressed.'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   599
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   600
#useIndex
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   601
'If on, use the items index as selection; if off, use the items value.'
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   602
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   603
#usePreferredExtent
1051
148c81e896ac help texts
Claus Gittinger <cg@exept.de>
parents: 1042
diff changeset
   604
'If on, the window computes its preferred extent; if off, the layout-sections value is used.'
367
5a78ebab56ff more helpTexts
Claus Gittinger <cg@exept.de>
parents: 364
diff changeset
   605
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   606
#validateDoubleClickSelector
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   607
'Message sent to the application to validate double click (no action if false is returned).'
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   608
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   609
#validateExpandabilitySelector
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   610
'Message sent to the application to validate expand on double click (no expand if false is returned).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   611
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   612
#valueChangeSelector
1028
592cfb2232ce help texts
Claus Gittinger <cg@exept.de>
parents: 1024
diff changeset
   613
'Message sent to the application when the selection has changed.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   614
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   615
#verticalLayout
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   616
'Defines how sub components are vertically arranged.'
294
65cb680c74e4 add some helptext
ca
parents: 172
diff changeset
   617
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   618
#verticalMiniScroller
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   619
'Use a mini-scroller as vertical scrollbar.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   620
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   621
#verticalScroller
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   622
'Enable vertical scrollability.'
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   623
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   624
#verticalSpace
780
96270af95475 help texts revised
tz
parents: 759
diff changeset
   625
'Vertical space between the sub components (in pixels).'
580
77cf5b8dcffc checkin from browser
ca
parents: 540
diff changeset
   626
1296
a2e403565be2 helpspec
Claus Gittinger <cg@exept.de>
parents: 1190
diff changeset
   627
#visibilityChannel
a2e403565be2 helpspec
Claus Gittinger <cg@exept.de>
parents: 1190
diff changeset
   628
'Aspect selector or binding for a boolean holder which makes the widget visible.'
a2e403565be2 helpspec
Claus Gittinger <cg@exept.de>
parents: 1190
diff changeset
   629
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   630
#windowIcon
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   631
'Name of the message sent to the application returning an icon image for the top window.'
303
798e309561f1 checkin from browser
ca
parents: 294
diff changeset
   632
350
28128eeb98f0 more help messages.
Claus Gittinger <cg@exept.de>
parents: 346
diff changeset
   633
#windowLabel
801
50231f23e149 help texts
Claus Gittinger <cg@exept.de>
parents: 783
diff changeset
   634
'Label of the top window.'
307
fe559a9136d9 changes caused by update of help tool
ca
parents: 303
diff changeset
   635
1190
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   636
#xRotChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   637
'Aspect providing x-Rotation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   638
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   639
#xTransChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   640
'Aspect providing x-Translation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   641
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   642
#yRotChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   643
'Aspect providing y-Rotation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   644
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   645
#yTransChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   646
'Aspect providing y-Translation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   647
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   648
#zRotChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   649
'Aspect providing z-Rotation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   650
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   651
#zTransChannel
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   652
'Aspect providing z-Translation value.'
237c82b3b0fc help texts
Claus Gittinger <cg@exept.de>
parents: 1181
diff changeset
   653
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   654
)
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   655
! !
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   656
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   657
!UISpecificationTool class methodsFor:'interface specs'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   658
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   659
windowSpec
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   660
    "This resource specification was automatically generated
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   661
     by the UIPainter of ST/X."
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   662
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   663
    "Do not manually edit this!! If it is corrupted,
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   664
     the UIPainter may not be able to read the specification."
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   665
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   666
    "
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   667
     UIPainter new openOnClass:UISpecificationTool andSelector:#windowSpec
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   668
     UISpecificationTool new openInterface:#windowSpec
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   669
     UISpecificationTool open
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   670
    "
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   671
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   672
    <resource: #canvas>
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   673
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   674
    ^ 
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   675
     #(#FullSpec
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   676
        #name: #windowSpec
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   677
        #window: 
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   678
       #(#WindowSpec
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   679
          #label: 'unnamed canvas'
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   680
          #name: 'unnamed canvas'
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   681
          #bounds: #(#Rectangle 30 217 330 517)
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   682
        )
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   683
        #component: 
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   684
       #(#SpecCollection
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   685
          #collection: #(
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   686
           #(#ArbitraryComponentSpec
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   687
              #name: 'ArbitraryComponent1'
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   688
              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   689
              #hasBorder: false
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   690
              #component: #buildInViewTop
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   691
            )
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   692
           )
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   693
         
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   694
        )
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   695
      )
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   696
! !
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   697
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   698
!UISpecificationTool methodsFor:'accessing'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   699
1063
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   700
acceptChannel
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   701
    "return the value of the instance variable 'acceptChannel' (automatically generated)"
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   702
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   703
    ^ masterApplication acceptChannel
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   704
!
9e710dbc7c92 inputFields use modified & acceptChannels
Claus Gittinger <cg@exept.de>
parents: 1051
diff changeset
   705
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   706
specification
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   707
    "gets current edit specification
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   708
    "
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   709
    ^ specification
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   710
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   711
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   712
!
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   713
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   714
specification:aSpec
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   715
    "sets current edit specification
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   716
    "
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   717
    aSpec isNil ifTrue:[
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   718
        ^ self specificationChanged
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   719
    ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   720
    "/ same type of spec - simply change the spec;  no need to setup everything
428
f87cca33874e remove dependencies from builder when selection changed
ca
parents: 367
diff changeset
   721
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   722
    specification class == aSpec class ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   723
        specification := aSpec.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   724
      ^ specChannel value:specification.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   725
    ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   726
    self specificationChanged.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   727
    specification := aSpec.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   728
    
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   729
    "/ some tricky specs need the builder during the addBindings phase.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   730
    "/ This is passed down in a special UIBindingsDictionary
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   731
    "/ (remain backward compatible)
536
3991e37ec19f pass special dictionary as bindings-environmnt
Claus Gittinger <cg@exept.de>
parents: 428
diff changeset
   732
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   733
    aspects := UISpecification newBindingsDictionary.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   734
    aspects builder:builder.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   735
    aspects at:#modifiedChannel put:modifiedHolder.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   736
    aspects at:#acceptChannel   put:self acceptChannel.
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   737
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   738
    specChannel := specification asValue.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   739
    specification class addBindingsTo:aspects for:specification channel:specChannel.
536
3991e37ec19f pass special dictionary as bindings-environmnt
Claus Gittinger <cg@exept.de>
parents: 428
diff changeset
   740
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   741
    "/ arrange for being notified, if any aspect changes
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   742
    aspects do:[:el| el addDependent:self ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   743
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   744
! !
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   745
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   746
!UISpecificationTool methodsFor:'accessing channels'!
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   747
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   748
modifiedHolder:aValueHolder
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   749
    "set the value holder set to true in case of modifying attributes
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   750
    "
1071
560a9eb1a5d8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1069
diff changeset
   751
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   752
    modifiedHolder removeDependent:self.
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   753
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   754
    (modifiedHolder := aValueHolder) notNil ifTrue:[
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   755
        modifiedHolder addDependent:self.
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   756
    ].
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   757
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   758
! !
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   759
364
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   760
!UISpecificationTool methodsFor:'actions'!
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   761
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   762
setMaxExtent
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   763
    "set the windows maxExtent from its current extent"
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   764
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   765
    |canvas currentExtent|
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   766
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   767
    canvas := self masterApplication painter topView.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   768
    currentExtent := canvas extent.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   769
    (self aspectFor:#maxX) value:currentExtent x.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   770
    (self aspectFor:#maxY) value:currentExtent y.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   771
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   772
    "Modified: / 29.10.1997 / 18:29:17 / cg"
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   773
!
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   774
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   775
setMinExtent
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   776
    "set the windows minExtent from its current extent"
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   777
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   778
    |canvas currentExtent|
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   779
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   780
    canvas := self masterApplication painter topView.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   781
    currentExtent := canvas extent.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   782
    (self aspectFor:#minX) value:currentExtent x.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   783
    (self aspectFor:#minY) value:currentExtent y.
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   784
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   785
    "Created: / 29.10.1997 / 18:17:55 / cg"
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   786
    "Modified: / 29.10.1997 / 18:28:53 / cg"
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   787
! !
c175e197f050 setMin / setMax
Claus Gittinger <cg@exept.de>
parents: 350
diff changeset
   788
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   789
!UISpecificationTool methodsFor:'bindings'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   790
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   791
aspectFor:aKey
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   792
    "returns aspect for a key or nil
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   793
    "
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   794
    aspects notNil ifTrue:[
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   795
        ^ aspects at:aKey ifAbsent:nil
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   796
    ].
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   797
    ^ super aspectFor:aKey
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   798
428
f87cca33874e remove dependencies from builder when selection changed
ca
parents: 367
diff changeset
   799
!
f87cca33874e remove dependencies from builder when selection changed
ca
parents: 367
diff changeset
   800
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   801
buildInViewTop
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   802
    ^ buildInView superView
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   803
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   804
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   805
!
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   806
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   807
specificationChanged
428
f87cca33874e remove dependencies from builder when selection changed
ca
parents: 367
diff changeset
   808
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   809
    specChannel notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   810
        specChannel release.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   811
        specChannel := nil.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   812
    ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   813
    aspects notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   814
        aspects release.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   815
        aspects := nil.
876
32b1012426e3 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 870
diff changeset
   816
    ].
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   817
    selection     := nil.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   818
    specification := nil.
869
65588145cd06 #createBuilder was removed
Claus Gittinger <cg@exept.de>
parents: 855
diff changeset
   819
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   820
    listOfSpecViews notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   821
        buildInView scrolledView:nil.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   822
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   823
        listOfSpecViews do:[:aView|
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   824
            aView notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   825
                aView destroy
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   826
            ]
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   827
        ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   828
        listOfSpecViews := nil.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   829
    ].
584
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   830
!
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   831
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   832
specificationFor:aKey
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   833
    "this is called if our current specification contains 
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   834
     subspecifications or subcanvases.
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   835
     Get the subspecification from the current specification"
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   836
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   837
    specification notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   838
        ^ specification class perform:aKey ifNotUnderstood:nil
584
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   839
    ].
351914fcc5a4 Define #specificationFor: to fetch subspecifications and
Stefan Vogel <sv@exept.de>
parents: 580
diff changeset
   840
    ^ nil
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   841
! !
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   842
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   843
!UISpecificationTool methodsFor:'change & update'!
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   844
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   845
update
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   846
    "reload specification
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   847
    "
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   848
    specChannel notNil ifTrue:[
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   849
        specChannel value:specification.
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   850
    ]
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   851
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   852
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   853
!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   854
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   855
update:something with:someArgument from:someone
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   856
    "any attribute changed its state in the current specification
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   857
    "
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   858
    someone ~~ modifiedHolder ifTrue:[
893
09ea254a9fda comments
Claus Gittinger <cg@exept.de>
parents: 876
diff changeset
   859
        "/ any in the spec has changed.
09ea254a9fda comments
Claus Gittinger <cg@exept.de>
parents: 876
diff changeset
   860
        "/ update my modified holders value
09ea254a9fda comments
Claus Gittinger <cg@exept.de>
parents: 876
diff changeset
   861
1071
560a9eb1a5d8 checkin from browser
Claus Gittinger <cg@exept.de>
parents: 1069
diff changeset
   862
        modifiedHolder value:true
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   863
    ]
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   864
893
09ea254a9fda comments
Claus Gittinger <cg@exept.de>
parents: 876
diff changeset
   865
    "Modified: / 16.7.1998 / 19:25:59 / cg"
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   866
! !
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   867
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   868
!UISpecificationTool methodsFor:'initialization'!
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   869
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   870
initialize
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   871
    |view|
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   872
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   873
    super initialize.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   874
    view := ScrollableView for:BuildInView.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   875
    view verticalScrollable:true.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   876
    view verticalMini:true.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   877
    view autoHideScrollBars:true.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   878
    view level:0.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   879
    buildInView := view scrolledView.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   880
! !
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   881
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   882
!UISpecificationTool methodsFor:'selection'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   883
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   884
selection:something
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   885
    "selection changed
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   886
    "
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   887
    |slices index spec window|
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   888
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   889
    specification notNil ifTrue:[
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   890
        slices := specification class slices.
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   891
        index  := slices findFirst:[:aSlice| aSlice first = something ].
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   892
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   893
        index ~~ 0 ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   894
            spec := specification class perform:((slices at:index) last)
428
f87cca33874e remove dependencies from builder when selection changed
ca
parents: 367
diff changeset
   895
        ]
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   896
    ].
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   897
172
10e8e0510baa helpSpec no longer under UIPainter
ca
parents: 164
diff changeset
   898
    spec ~= selection ifTrue:[
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   899
        (selection := spec) notNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   900
            listOfSpecViews isNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   901
                listOfSpecViews := Array new:(slices size).
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   902
            ] ifFalse:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   903
                window := listOfSpecViews at:index
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   904
            ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   905
            window isNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   906
                builder buildFromSpec:spec in:(window := SimpleView new).
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   907
                listOfSpecViews at:index put:window.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   908
            ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   909
        ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   910
        buildInView scrolledView:window.
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   911
    ].
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   912
! !
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   913
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   914
!UISpecificationTool::BuildInView methodsFor:'accessing'!
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   915
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   916
scrolledView:aView
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   917
    "set the view to be scrolled"
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   918
    |scr|
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   919
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   920
    scrolledView == aView ifTrue:[^ self].
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   921
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   922
    outerFrame isNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   923
        self level:0.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   924
        outerFrame := SimpleView origin:0.0@0.0 corner:1.0@1.0 in:self.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   925
        realized ifTrue:[outerFrame realize].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   926
    ].
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   927
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   928
    scrolledView notNil ifTrue:[scrolledView unmap].
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   929
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   930
    (scrolledView := aView) isNil ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   931
        ^ self
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   932
    ].
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   933
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   934
    scrolledView superView == outerFrame ifFalse:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   935
        scrolledView borderWidth:0; level:0.
845
146b3f78afcb we dont want any 3D effect for the scrolled view
Claus Gittinger <cg@exept.de>
parents: 837
diff changeset
   936
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   937
        outerFrame addSubView:scrolledView.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   938
        scrolledView origin:0@0 corner:1.0 @ (scrolledView preferredExtent y).
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   939
        scrolledView := scrolledView.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   940
        scrolledView allViewBackground:(self viewBackground).
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   941
    ].
845
146b3f78afcb we dont want any 3D effect for the scrolled view
Claus Gittinger <cg@exept.de>
parents: 837
diff changeset
   942
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   943
    realized ifTrue:[
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   944
        scrolledView realize.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   945
        self sizeChanged:nil.
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   946
    ].
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   947
1307
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   948
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   949
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   950
52898ecde37d tabing: use map/unmap insteat of raise
ca
parents: 1296
diff changeset
   951
759
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   952
! !
f0c325edcc6c add scroller
ca
parents: 752
diff changeset
   953
164
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   954
!UISpecificationTool class methodsFor:'documentation'!
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   955
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   956
version
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   957
    ^ '$Header$'
1bc26edd0d3e intitial checkin
ca
parents:
diff changeset
   958
! !