GraphColumnViewSpec.st
changeset 3150 e3a55f15ef7e
parent 1655 227e03cb343e
child 3309 5e33115fabe7
equal deleted inserted replaced
3149:66df7168e377 3150:e3a55f15ef7e
     1 "
     1 "
     2  COPYRIGHT (c) 1998 by eXept Software AG
     2  COPYRIGHT (c) 1998 by eXept Software AG
     3               All Rights Reserved
     3 	      All Rights Reserved
     4 
     4 
     5  This software is furnished under a license and may be used
     5  This software is furnished under a license and may be used
     6  only in accordance with the terms of that license and with the
     6  only in accordance with the terms of that license and with the
     7  inclusion of the above copyright notice.   This software may not
     7  inclusion of the above copyright notice.   This software may not
     8  be provided or otherwise made available to, or used by, any
     8  be provided or otherwise made available to, or used by, any
     9  other person.  No title to or ownership of the software is
     9  other person.  No title to or ownership of the software is
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
    12 
    12 
    13 
    13 "{ Package: 'stx:libwidg2' }"
    14 
    14 
    15 MenuComponentSpec subclass:#GraphColumnViewSpec
    15 MenuComponentSpec subclass:#GraphColumnViewSpec
    16 	instanceVariableNames:'listHolder references referenceSelector showGrid showDefaultMenu
    16 	instanceVariableNames:'listHolder references referenceSelector showGrid showDefaultMenu
    17 		zoomY windowSize graphOriginX scrollUpdatesOriginX'
    17 		zoomY windowSize graphOriginX scrollUpdatesOriginX'
    18 	classVariableNames:''
    18 	classVariableNames:''
    23 !GraphColumnViewSpec class methodsFor:'documentation'!
    23 !GraphColumnViewSpec class methodsFor:'documentation'!
    24 
    24 
    25 copyright
    25 copyright
    26 "
    26 "
    27  COPYRIGHT (c) 1998 by eXept Software AG
    27  COPYRIGHT (c) 1998 by eXept Software AG
    28               All Rights Reserved
    28 	      All Rights Reserved
    29 
    29 
    30  This software is furnished under a license and may be used
    30  This software is furnished under a license and may be used
    31  only in accordance with the terms of that license and with the
    31  only in accordance with the terms of that license and with the
    32  inclusion of the above copyright notice.   This software may not
    32  inclusion of the above copyright notice.   This software may not
    33  be provided or otherwise made available to, or used by, any
    33  be provided or otherwise made available to, or used by, any
    41 documentation
    41 documentation
    42 "
    42 "
    43     Not normally used by applications.
    43     Not normally used by applications.
    44 
    44 
    45     [author:]
    45     [author:]
    46         Claus Atzkern
    46 	Claus Atzkern
    47 
    47 
    48     [see also:]
    48     [see also:]
    49         UIBuilder
    49 	UIBuilder
    50         UIPainter
    50 	UIPainter
    51 "
    51 "
    52 
    52 
    53 
    53 
    54 
    54 
    55 ! !
    55 ! !
    56 
    56 
    57 !GraphColumnViewSpec class methodsFor:'class initialization'!
    57 !GraphColumnViewSpec class methodsFor:'class initialization'!
    58 
    58 
    59 initialize
    59 initialize
    60     "add an entry for my new components to the UIPainters 
    60     "add an entry for my new components to the UIPainters
    61      userDef gallery"
    61      userDef gallery"
    62 
    62 
    63     UISelectionPanel userClass
    63     UISelectionPanel userClass
    64         addUserSpecHolder:[self graphSpec]
    64 	addUserSpecHolder:[self graphSpec]
    65         label:'Graphs'
    65 	label:'Graphs'
    66 
    66 
    67     "
    67     "
    68      self initialize
    68      self initialize
    69     "
    69     "
    70 
    70 
    79 
    79 
    80 ! !
    80 ! !
    81 
    81 
    82 !GraphColumnViewSpec class methodsFor:'interface - painter'!
    82 !GraphColumnViewSpec class methodsFor:'interface - painter'!
    83 
    83 
    84 addBindingsTo:env for:inst channel:aChannel 
    84 addBindingsTo:env for:inst channel:aChannel
    85 
    85 
    86     super addBindingsTo:env for:inst channel:aChannel.
    86     super addBindingsTo:env for:inst channel:aChannel.
    87 
    87 
    88     self 
    88     self
    89         adaptApects:
    89 	adaptApects:
    90                     #(  
    90 		    #(
    91                         showGrid
    91 			showGrid
    92                         showDefaultMenu
    92 			showDefaultMenu
    93                         scrollUpdatesOriginX
    93 			scrollUpdatesOriginX
    94                      )
    94 		     )
    95         to:env 
    95 	to:env
    96         for:inst 
    96 	for:inst
    97         channel:aChannel.
    97 	channel:aChannel.
    98 
    98 
    99     self 
    99     self
   100         adaptApects:
   100 	adaptApects:
   101                     #(  
   101 		    #(
   102                         zoomY
   102 			zoomY
   103                         windowSize
   103 			windowSize
   104                         graphOriginX
   104 			graphOriginX
   105                         references
   105 			references
   106                         referenceSelector
   106 			referenceSelector
   107                      )
   107 		     )
   108         to:env 
   108 	to:env
   109         for:inst 
   109 	for:inst
   110         channel:aChannel
   110 	channel:aChannel
   111         converter:#symbolOrNil.
   111 	converter:#symbolOrNil.
   112 
   112 
   113 ! !
   113 ! !
   114 
   114 
   115 !GraphColumnViewSpec class methodsFor:'interface gallery'!
   115 !GraphColumnViewSpec class methodsFor:'interface gallery'!
   116 
   116 
   128     <resource: #canvas>
   128     <resource: #canvas>
   129 
   129 
   130     ^
   130     ^
   131 
   131 
   132        #(#FullSpec
   132        #(#FullSpec
   133           #'window:' 
   133 	  #'window:'
   134            #(#WindowSpec
   134 	   #(#WindowSpec
   135               #'name:' 'Views'
   135 	      #'name:' 'Views'
   136               #'layout:' #(#LayoutFrame 212 0 194 0 691 0 422 0)
   136 	      #'layout:' #(#LayoutFrame 212 0 194 0 691 0 422 0)
   137               #'label:' 'Views'
   137 	      #'label:' 'Views'
   138               #'min:' #(#Point 10 10)
   138 	      #'min:' #(#Point 10 10)
   139               #'max:' #(#Point 1280 1024)
   139 	      #'max:' #(#Point 1280 1024)
   140               #'bounds:' #(#Rectangle 212 194 692 423)
   140 	      #'bounds:' #(#Rectangle 212 194 692 423)
   141               #'usePreferredExtent:' false
   141 	      #'usePreferredExtent:' false
   142           )
   142 	  )
   143           #'component:' 
   143 	  #'component:'
   144            #(#SpecCollection
   144 	   #(#SpecCollection
   145               #'collection:' 
   145 	      #'collection:'
   146                #(
   146 	       #(
   147                  #(#GraphColumnView2DSpec
   147 		 #(#GraphColumnView2DSpec
   148                     #'name:' '2D Graph'
   148 		    #'name:' '2D Graph'
   149                     #'layout:' #(#LayoutFrame 15 0 10 0 180 0 90 0)
   149 		    #'layout:' #(#LayoutFrame 15 0 10 0 180 0 90 0)
   150                     #'showGrid:' true
   150 		    #'showGrid:' true
   151                     #'gridX:' 2
   151 		    #'gridX:' 2
   152                     #'gridY:' 2
   152 		    #'gridY:' 2
   153                 )
   153 		)
   154                  #(#LabelSpec
   154 		 #(#LabelSpec
   155                     #'name:' '2D Graph Label'
   155 		    #'name:' '2D Graph Label'
   156                     #'layout:' #(#Point 15 96)
   156 		    #'layout:' #(#Point 15 96)
   157                     #'label:' 'Graph Column View 2D'
   157 		    #'label:' 'Graph Column View 2D'
   158                     #'style:' #(#FontDescription #helvetica #medium #roman #'10')
   158 		    #'style:' #(#FontDescription #helvetica #medium #roman #'10')
   159                     #'adjust:' #left
   159 		    #'adjust:' #left
   160                     #'resizeForLabel:' true
   160 		    #'resizeForLabel:' true
   161                     #'canUIDrag:' false
   161 		    #'canUIDrag:' false
   162                 )
   162 		)
   163                  #(#GraphColumnView3DSpec
   163 		 #(#GraphColumnView3DSpec
   164                     #'name:' '3D Graph'
   164 		    #'name:' '3D Graph'
   165                     #'layout:' #(#LayoutFrame 206 0 10 0 371 0 90 0)
   165 		    #'layout:' #(#LayoutFrame 206 0 10 0 371 0 90 0)
   166                     #'showGrid:' true
   166 		    #'showGrid:' true
   167                 )
   167 		)
   168                  #(#LabelSpec
   168 		 #(#LabelSpec
   169                     #'name:' '3D Graph Label'
   169 		    #'name:' '3D Graph Label'
   170                     #'layout:' #(#Point 206 96)
   170 		    #'layout:' #(#Point 206 96)
   171                     #'label:' 'Graph Column View 3D'
   171 		    #'label:' 'Graph Column View 3D'
   172                     #'style:' #(#FontDescription #helvetica #medium #roman #'10')
   172 		    #'style:' #(#FontDescription #helvetica #medium #roman #'10')
   173                     #'adjust:' #left
   173 		    #'adjust:' #left
   174                     #'resizeForLabel:' true
   174 		    #'resizeForLabel:' true
   175                     #'canUIDrag:' false
   175 		    #'canUIDrag:' false
   176                 )
   176 		)
   177               )
   177 	      )
   178           )
   178 	  )
   179       )
   179       )
   180 
   180 
   181 
   181 
   182 ! !
   182 ! !
   183 
   183 
   194      UIPainter new openOnClass:GraphColumnViewSpec andSelector:#basicsEditSpec
   194      UIPainter new openOnClass:GraphColumnViewSpec andSelector:#basicsEditSpec
   195     "
   195     "
   196 
   196 
   197     <resource: #canvas>
   197     <resource: #canvas>
   198 
   198 
   199     ^ 
   199     ^
   200      #(#FullSpec
   200      #(#FullSpec
   201         #name: #basicsEditSpec
   201 	#name: #basicsEditSpec
   202         #window: 
   202 	#window:
   203        #(#WindowSpec
   203        #(#WindowSpec
   204           #label: 'Graph 2D Basic'
   204 	  #label: 'Graph 2D Basic'
   205           #name: 'Graph 2D Basic'
   205 	  #name: 'Graph 2D Basic'
   206           #min: #(#Point 10 10)
   206 	  #min: #(#Point 10 10)
   207           #max: #(#Point 1160 870)
   207 	  #max: #(#Point 1160 870)
   208           #bounds: #(#Rectangle 886 214 1198 539)
   208 	  #bounds: #(#Rectangle 886 214 1198 539)
   209         )
   209 	)
   210         #component: 
   210 	#component:
   211        #(#SpecCollection
   211        #(#SpecCollection
   212           #collection: #(
   212 	  #collection: #(
   213            #(#LabelSpec
   213 	   #(#LabelSpec
   214               #label: 'ID:'
   214 	      #label: 'ID:'
   215               #name: 'nameLabel'
   215 	      #name: 'nameLabel'
   216               #layout: #(#AlignmentOrigin 73 0 31 0 1 0.5)
   216 	      #layout: #(#AlignmentOrigin 73 0 31 0 1 0.5)
   217               #resizeForLabel: true
   217 	      #resizeForLabel: true
   218               #adjust: #right
   218 	      #adjust: #right
   219             )
   219 	    )
   220            #(#InputFieldSpec
   220 	   #(#InputFieldSpec
   221               #attributes: 
   221 	      #attributes:
   222              #(#tabable
   222 	     #(#tabable
   223                 true #nameField
   223 		true #nameField
   224                 nil
   224 		nil
   225               )
   225 	      )
   226               #name: 'nameField'
   226 	      #name: 'nameField'
   227               #layout: #(#LayoutFrame 75 0 20 0 -2 1.0 45 0)
   227 	      #layout: #(#LayoutFrame 75 0 20 0 -2 1.0 45 0)
   228               #activeHelpKey: #id
   228 	      #activeHelpKey: #id
   229               #tabable: true
   229 	      #tabable: true
   230               #model: #name
   230 	      #model: #name
   231               #acceptChannel: #acceptChannel
   231 	      #acceptChannel: #acceptChannel
   232               #modifiedChannel: #modifiedChannel
   232 	      #modifiedChannel: #modifiedChannel
   233               #acceptOnPointerLeave: false
   233 	      #acceptOnPointerLeave: false
   234             )
   234 	    )
   235            #(#LabelSpec
   235 	   #(#LabelSpec
   236               #label: 'Model:'
   236 	      #label: 'Model:'
   237               #name: 'modelLabel'
   237 	      #name: 'modelLabel'
   238               #layout: #(#AlignmentOrigin 73 0 60 0 1 0.5)
   238 	      #layout: #(#AlignmentOrigin 73 0 60 0 1 0.5)
   239               #resizeForLabel: true
   239 	      #resizeForLabel: true
   240             )
   240 	    )
   241            #(#InputFieldSpec
   241 	   #(#InputFieldSpec
   242               #attributes: 
   242 	      #attributes:
   243              #(#tabable
   243 	     #(#tabable
   244                 true
   244 		true
   245               )
   245 	      )
   246               #name: 'modelField'
   246 	      #name: 'modelField'
   247               #layout: #(#LayoutFrame 75 0 49 0 -2 1 74 0)
   247 	      #layout: #(#LayoutFrame 75 0 49 0 -2 1 74 0)
   248               #activeHelpKey: #model
   248 	      #activeHelpKey: #model
   249               #tabable: true
   249 	      #tabable: true
   250               #model: #model
   250 	      #model: #model
   251               #acceptChannel: #acceptChannel
   251 	      #acceptChannel: #acceptChannel
   252               #modifiedChannel: #modifiedChannel
   252 	      #modifiedChannel: #modifiedChannel
   253               #acceptOnPointerLeave: false
   253 	      #acceptOnPointerLeave: false
   254             )
   254 	    )
   255            #(#LabelSpec
   255 	   #(#LabelSpec
   256               #label: 'References:'
   256 	      #label: 'References:'
   257               #name: 'referencesLabel'
   257 	      #name: 'referencesLabel'
   258               #layout: #(#AlignmentOrigin 168 0 90 0 1 0.5)
   258 	      #layout: #(#AlignmentOrigin 168 0 90 0 1 0.5)
   259               #resizeForLabel: true
   259 	      #resizeForLabel: true
   260               #adjust: #left
   260 	      #adjust: #left
   261             )
   261 	    )
   262            #(#InputFieldSpec
   262 	   #(#InputFieldSpec
   263               #attributes: 
   263 	      #attributes:
   264              #(#referencesField
   264 	     #(#referencesField
   265                 nil #tabable
   265 		nil #tabable
   266                 true
   266 		true
   267               )
   267 	      )
   268               #name: 'referencesField'
   268 	      #name: 'referencesField'
   269               #layout: #(#LayoutFrame 171 0 80 0 -2 1.0 102 0)
   269 	      #layout: #(#LayoutFrame 171 0 80 0 -2 1.0 102 0)
   270               #tabable: true
   270 	      #tabable: true
   271               #model: #references
   271 	      #model: #references
   272               #acceptChannel: #acceptChannel
   272 	      #acceptChannel: #acceptChannel
   273               #modifiedChannel: #modifiedChannel
   273 	      #modifiedChannel: #modifiedChannel
   274               #acceptOnPointerLeave: false
   274 	      #acceptOnPointerLeave: false
   275             )
   275 	    )
   276            #(#LabelSpec
   276 	   #(#LabelSpec
   277               #label: 'Access Selector:'
   277 	      #label: 'Access Selector:'
   278               #name: 'referencesSelLabel'
   278 	      #name: 'referencesSelLabel'
   279               #layout: #(#AlignmentOrigin 168 0 116 0 1 0.5)
   279 	      #layout: #(#AlignmentOrigin 168 0 116 0 1 0.5)
   280               #resizeForLabel: true
   280 	      #resizeForLabel: true
   281               #adjust: #left
   281 	      #adjust: #left
   282             )
   282 	    )
   283            #(#InputFieldSpec
   283 	   #(#InputFieldSpec
   284               #name: 'referencesSelField'
   284 	      #name: 'referencesSelField'
   285               #layout: #(#LayoutFrame 171 0 106 0 -2 1.0 128 0)
   285 	      #layout: #(#LayoutFrame 171 0 106 0 -2 1.0 128 0)
   286               #model: #referenceSelector
   286 	      #model: #referenceSelector
   287               #acceptChannel: #acceptChannel
   287 	      #acceptChannel: #acceptChannel
   288               #modifiedChannel: #modifiedChannel
   288 	      #modifiedChannel: #modifiedChannel
   289               #acceptOnPointerLeave: false
   289 	      #acceptOnPointerLeave: false
   290             )
   290 	    )
   291            #(#UISubSpecification
   291 	   #(#UISubSpecification
   292               #name: 'menuSubSpec'
   292 	      #name: 'menuSubSpec'
   293               #layout: #(#LayoutFrame 0 0.0 144 0 0 1.0 263 0)
   293 	      #layout: #(#LayoutFrame 0 0.0 144 0 0 1.0 263 0)
   294               #majorKey: #UISpecification
   294 	      #majorKey: #UISpecification
   295               #minorKey: #menuSubSpec
   295 	      #minorKey: #menuSubSpec
   296             )
   296 	    )
   297            #(#CheckBoxSpec
   297 	   #(#CheckBoxSpec
   298               #attributes: 
   298 	      #attributes:
   299              #(#tabable
   299 	     #(#tabable
   300                 true
   300 		true
   301               )
   301 	      )
   302               #label: 'Default Menu'
   302 	      #label: 'Default Menu'
   303               #name: 'showDefaultMenu'
   303 	      #name: 'showDefaultMenu'
   304               #layout: #(#AlignmentOrigin 97 0 280 0 0 0.5)
   304 	      #layout: #(#AlignmentOrigin 97 0 280 0 0 0.5)
   305               #tabable: true
   305 	      #tabable: true
   306               #model: #showDefaultMenu
   306 	      #model: #showDefaultMenu
   307             )
   307 	    )
   308            )
   308 	   )
   309          
   309 
   310         )
   310 	)
   311       )
   311       )
   312 !
   312 !
   313 
   313 
   314 subDetailsEditSpec
   314 subDetailsEditSpec
   315     "This resource specification was automatically generated
   315     "This resource specification was automatically generated
   322      UIPainter new openOnClass:GraphColumnViewSpec andSelector:#subDetailsEditSpec
   322      UIPainter new openOnClass:GraphColumnViewSpec andSelector:#subDetailsEditSpec
   323     "
   323     "
   324 
   324 
   325     <resource: #canvas>
   325     <resource: #canvas>
   326 
   326 
   327     ^ 
   327     ^
   328      #(#FullSpec
   328      #(#FullSpec
   329         #name: #subDetailsEditSpec
   329 	#name: #subDetailsEditSpec
   330         #window: 
   330 	#window:
   331        #(#WindowSpec
   331        #(#WindowSpec
   332           #label: 'Graph 2D Detail'
   332 	  #label: 'Graph 2D Detail'
   333           #name: 'Graph 2D Detail'
   333 	  #name: 'Graph 2D Detail'
   334           #min: #(#Point 10 10)
   334 	  #min: #(#Point 10 10)
   335           #max: #(#Point 1160 870)
   335 	  #max: #(#Point 1160 870)
   336           #bounds: #(#Rectangle 886 214 1269 437)
   336 	  #bounds: #(#Rectangle 886 214 1269 437)
   337         )
   337 	)
   338         #component: 
   338 	#component:
   339        #(#SpecCollection
   339        #(#SpecCollection
   340           #collection: #(
   340 	  #collection: #(
   341            #(#LabelSpec
   341 	   #(#LabelSpec
   342               #label: 'Border Width:'
   342 	      #label: 'Border Width:'
   343               #name: 'borderWidthLabel'
   343 	      #name: 'borderWidthLabel'
   344               #layout: #(#AlignmentOrigin 157 0 35 0 1 0.5)
   344 	      #layout: #(#AlignmentOrigin 157 0 35 0 1 0.5)
   345               #resizeForLabel: true
   345 	      #resizeForLabel: true
   346               #adjust: #left
   346 	      #adjust: #left
   347             )
   347 	    )
   348            #(#InputFieldSpec
   348 	   #(#InputFieldSpec
   349               #attributes: 
   349 	      #attributes:
   350              #(#tabable
   350 	     #(#tabable
   351                 true
   351 		true
   352               )
   352 	      )
   353               #name: 'borderWidthField'
   353 	      #name: 'borderWidthField'
   354               #layout: #(#LayoutFrame 161 0 24 0 197 0 46 0)
   354 	      #layout: #(#LayoutFrame 161 0 24 0 197 0 46 0)
   355               #activeHelpKey: #borderWidth
   355 	      #activeHelpKey: #borderWidth
   356               #tabable: true
   356 	      #tabable: true
   357               #model: #borderWidth
   357 	      #model: #borderWidth
   358               #acceptChannel: #acceptChannel
   358 	      #acceptChannel: #acceptChannel
   359               #modifiedChannel: #modifiedChannel
   359 	      #modifiedChannel: #modifiedChannel
   360               #acceptOnPointerLeave: false
   360 	      #acceptOnPointerLeave: false
   361             )
   361 	    )
   362            #(#LabelSpec
   362 	   #(#LabelSpec
   363               #label: 'Level:'
   363 	      #label: 'Level:'
   364               #name: 'levelLabel'
   364 	      #name: 'levelLabel'
   365               #layout: #(#AlignmentOrigin 157 0 58 0 1 0.5)
   365 	      #layout: #(#AlignmentOrigin 157 0 58 0 1 0.5)
   366               #resizeForLabel: true
   366 	      #resizeForLabel: true
   367             )
   367 	    )
   368            #(#InputFieldSpec
   368 	   #(#InputFieldSpec
   369               #attributes: 
   369 	      #attributes:
   370              #(#tabable
   370 	     #(#tabable
   371                 true
   371 		true
   372               )
   372 	      )
   373               #name: 'levelField'
   373 	      #name: 'levelField'
   374               #layout: #(#LayoutFrame 161 0 48 0 197 0 70 0)
   374 	      #layout: #(#LayoutFrame 161 0 48 0 197 0 70 0)
   375               #activeHelpKey: #level
   375 	      #activeHelpKey: #level
   376               #tabable: true
   376 	      #tabable: true
   377               #model: #level
   377 	      #model: #level
   378               #acceptChannel: #acceptChannel
   378 	      #acceptChannel: #acceptChannel
   379               #modifiedChannel: #modifiedChannel
   379 	      #modifiedChannel: #modifiedChannel
   380               #acceptOnPointerLeave: false
   380 	      #acceptOnPointerLeave: false
   381             )
   381 	    )
   382            #(#LabelSpec
   382 	   #(#LabelSpec
   383               #label: 'Origin X'
   383 	      #label: 'Origin X'
   384               #name: 'graphOriginXLabel'
   384 	      #name: 'graphOriginXLabel'
   385               #layout: #(#AlignmentOrigin 157 0 91 0 1 0.5)
   385 	      #layout: #(#AlignmentOrigin 157 0 91 0 1 0.5)
   386               #resizeForLabel: true
   386 	      #resizeForLabel: true
   387               #adjust: #left
   387 	      #adjust: #left
   388             )
   388 	    )
   389            #(#InputFieldSpec
   389 	   #(#InputFieldSpec
   390               #attributes: 
   390 	      #attributes:
   391              #(#graphOriginXField
   391 	     #(#graphOriginXField
   392                 nil #tabable
   392 		nil #tabable
   393                 true
   393 		true
   394               )
   394 	      )
   395               #name: 'graphOriginXField'
   395 	      #name: 'graphOriginXField'
   396               #layout: #(#LayoutFrame 161 0 81 0 -2 1.0 103 0)
   396 	      #layout: #(#LayoutFrame 161 0 81 0 -2 1.0 103 0)
   397               #tabable: true
   397 	      #tabable: true
   398               #model: #graphOriginX
   398 	      #model: #graphOriginX
   399               #acceptChannel: #acceptChannel
   399 	      #acceptChannel: #acceptChannel
   400               #modifiedChannel: #modifiedChannel
   400 	      #modifiedChannel: #modifiedChannel
   401               #acceptOnPointerLeave: false
   401 	      #acceptOnPointerLeave: false
   402             )
   402 	    )
   403            #(#CheckBoxSpec
   403 	   #(#CheckBoxSpec
   404               #attributes: 
   404 	      #attributes:
   405              #(#tabable
   405 	     #(#tabable
   406                 true
   406 		true
   407               )
   407 	      )
   408               #label: 'Scroll updates X-Origin'
   408 	      #label: 'Scroll updates X-Origin'
   409               #name: 'scrollUpdatesOriginX'
   409 	      #name: 'scrollUpdatesOriginX'
   410               #layout: #(#AlignmentOrigin 158 0 117 0 0 0.5)
   410 	      #layout: #(#AlignmentOrigin 158 0 117 0 0 0.5)
   411               #tabable: true
   411 	      #tabable: true
   412               #model: #scrollUpdatesOriginX
   412 	      #model: #scrollUpdatesOriginX
   413             )
   413 	    )
   414            #(#LabelSpec
   414 	   #(#LabelSpec
   415               #label: 'Window Size:'
   415 	      #label: 'Window Size:'
   416               #name: 'windowSizeLabel'
   416 	      #name: 'windowSizeLabel'
   417               #layout: #(#AlignmentOrigin 157 0 149 0 1 0.5)
   417 	      #layout: #(#AlignmentOrigin 157 0 149 0 1 0.5)
   418               #resizeForLabel: true
   418 	      #resizeForLabel: true
   419               #adjust: #left
   419 	      #adjust: #left
   420             )
   420 	    )
   421            #(#InputFieldSpec
   421 	   #(#InputFieldSpec
   422               #attributes: 
   422 	      #attributes:
   423              #(#windowSizeField
   423 	     #(#windowSizeField
   424                 nil #tabable
   424 		nil #tabable
   425                 true
   425 		true
   426               )
   426 	      )
   427               #name: 'windowSizeField'
   427 	      #name: 'windowSizeField'
   428               #layout: #(#LayoutFrame 161 0 139 0 -2 1.0 161 0)
   428 	      #layout: #(#LayoutFrame 161 0 139 0 -2 1.0 161 0)
   429               #tabable: true
   429 	      #tabable: true
   430               #model: #windowSize
   430 	      #model: #windowSize
   431               #acceptChannel: #acceptChannel
   431 	      #acceptChannel: #acceptChannel
   432               #modifiedChannel: #modifiedChannel
   432 	      #modifiedChannel: #modifiedChannel
   433               #acceptOnPointerLeave: false
   433 	      #acceptOnPointerLeave: false
   434             )
   434 	    )
   435            #(#LabelSpec
   435 	   #(#LabelSpec
   436               #label: 'Zoom-Y Factor:'
   436 	      #label: 'Zoom-Y Factor:'
   437               #name: 'zoomYLabel'
   437 	      #name: 'zoomYLabel'
   438               #layout: #(#AlignmentOrigin 157 0 173 0 1 0.5)
   438 	      #layout: #(#AlignmentOrigin 157 0 173 0 1 0.5)
   439               #resizeForLabel: true
   439 	      #resizeForLabel: true
   440               #adjust: #left
   440 	      #adjust: #left
   441             )
   441 	    )
   442            #(#InputFieldSpec
   442 	   #(#InputFieldSpec
   443               #attributes: 
   443 	      #attributes:
   444              #(#tabable
   444 	     #(#tabable
   445                 true #zoomYField
   445 		true #zoomYField
   446                 nil
   446 		nil
   447               )
   447 	      )
   448               #name: 'zoomYField'
   448 	      #name: 'zoomYField'
   449               #layout: #(#LayoutFrame 161 0 163 0 -2 1.0 185 0)
   449 	      #layout: #(#LayoutFrame 161 0 163 0 -2 1.0 185 0)
   450               #tabable: true
   450 	      #tabable: true
   451               #model: #zoomY
   451 	      #model: #zoomY
   452               #acceptChannel: #acceptChannel
   452 	      #acceptChannel: #acceptChannel
   453               #modifiedChannel: #modifiedChannel
   453 	      #modifiedChannel: #modifiedChannel
   454               #acceptOnPointerLeave: false
   454 	      #acceptOnPointerLeave: false
   455             )
   455 	    )
   456            )
   456 	   )
   457          
   457 
   458         )
   458 	)
   459       )
   459       )
   460 ! !
   460 ! !
   461 
   461 
   462 !GraphColumnViewSpec methodsFor:'accessing'!
   462 !GraphColumnViewSpec methodsFor:'accessing'!
   463 
   463 
   576 
   576 
   577 createViewFor:aBuilder in:aView
   577 createViewFor:aBuilder in:aView
   578     "low level create - no attributes are set.
   578     "low level create - no attributes are set.
   579     "
   579     "
   580     aBuilder isEditing ifFalse:[
   580     aBuilder isEditing ifFalse:[
   581         ^ super createViewFor:aBuilder in:aView
   581 	^ super createViewFor:aBuilder in:aView
   582     ].
   582     ].
   583     ^ GraphColumnView in:aView
   583     ^ GraphColumnView in:aView
   584 
   584 
   585 !
   585 !
   586 
   586 
   591     aView showGrid:(self showGrid).
   591     aView showGrid:(self showGrid).
   592     aView scrollUpdatesOriginX:(self scrollUpdatesOriginX).
   592     aView scrollUpdatesOriginX:(self scrollUpdatesOriginX).
   593     aView showDefaultMenu:(self showDefaultMenu).
   593     aView showDefaultMenu:(self showDefaultMenu).
   594 
   594 
   595     aBuilder isEditing ifFalse:[
   595     aBuilder isEditing ifFalse:[
   596         windowSize notNil ifTrue:[
   596 	windowSize notNil ifTrue:[
   597             aView windowSizeHolder:(self getBindingIn:aBuilder binding:windowSize)
   597 	    aView windowSizeHolder:(self getBindingIn:aBuilder binding:windowSize)
   598         ].
   598 	].
   599 
   599 
   600         graphOriginX notNil ifTrue:[
   600 	graphOriginX notNil ifTrue:[
   601             aView graphOriginXHolder:(self getBindingIn:aBuilder binding:graphOriginX)
   601 	    aView graphOriginXHolder:(self getBindingIn:aBuilder binding:graphOriginX)
   602         ].
   602 	].
   603 
   603 
   604         referenceSelector notNil ifTrue:[
   604 	referenceSelector notNil ifTrue:[
   605             aView referenceSelector:referenceSelector
   605 	    aView referenceSelector:referenceSelector
   606         ].
   606 	].
   607 
   607 
   608         references notNil ifTrue:[
   608 	references notNil ifTrue:[
   609             aView referenceHolder:(self getBindingIn:aBuilder binding:references)
   609 	    aView referenceHolder:(self getBindingIn:aBuilder binding:references)
   610         ].
   610 	].
   611 
   611 
   612         zoomY notNil ifTrue:[
   612 	zoomY notNil ifTrue:[
   613             aView zoomYHolder:(self getBindingIn:aBuilder binding:zoomY)
   613 	    aView zoomYHolder:(self getBindingIn:aBuilder binding:zoomY)
   614         ].
   614 	].
   615 
   615 
   616         self setModelAttributeIn:aView with:aBuilder.
   616 	self setModelAttributeIn:aView with:aBuilder.
   617         self setMenuIn:aView with:aBuilder.
   617 	self setMenuIn:aView with:aBuilder.
   618     ]
   618     ]
   619 ! !
   619 ! !
   620 
   620 
   621 !GraphColumnViewSpec methodsFor:'converting'!
   621 !GraphColumnViewSpec methodsFor:'converting'!
   622 
   622 
   632     graphOriginX      isNil ifTrue:[l add:#graphOriginX].
   632     graphOriginX      isNil ifTrue:[l add:#graphOriginX].
   633     references        isNil ifTrue:[l add:#references].
   633     references        isNil ifTrue:[l add:#references].
   634     referenceSelector isNil ifTrue:[l add:#referenceSelector].
   634     referenceSelector isNil ifTrue:[l add:#referenceSelector].
   635 
   635 
   636     self showGrid ifFalse:[
   636     self showGrid ifFalse:[
   637         l add:#showGrid
   637 	l add:#showGrid
   638     ].
   638     ].
   639 
   639 
   640     self scrollUpdatesOriginX ifFalse:[
   640     self scrollUpdatesOriginX ifFalse:[
   641         l add:#scrollUpdatesOriginX
   641 	l add:#scrollUpdatesOriginX
   642     ].
   642     ].
   643 
   643 
   644     (self showDefaultMenu and:[menu isNil]) ifFalse:[
   644     (self showDefaultMenu and:[menu isNil]) ifFalse:[
   645         l add:#showDefaultMenu
   645 	l add:#showDefaultMenu
   646     ].        
   646     ].
   647 
   647 
   648   ^ l
   648   ^ l
   649 
   649 
   650 
   650 
   651 
   651 
   674 ! !
   674 ! !
   675 
   675 
   676 !GraphColumnViewSpec class methodsFor:'documentation'!
   676 !GraphColumnViewSpec class methodsFor:'documentation'!
   677 
   677 
   678 version
   678 version
   679     ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.11 2000-01-24 10:43:00 ca Exp $'
   679     ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.12 2006-11-13 16:11:30 cg Exp $'
   680 ! !
   680 ! !
   681 GraphColumnViewSpec initialize!
   681 GraphColumnViewSpec initialize!