FileApplicationNoteBook.st
changeset 6484 9d12c4191a47
parent 6482 00207f456339
child 6518 cc70159b7a85
equal deleted inserted replaced
6483:b40237b315f1 6484:9d12c4191a47
   181 
   181 
   182     "Do not manually edit this!! If it is corrupted,
   182     "Do not manually edit this!! If it is corrupted,
   183      the UIPainter may not be able to read the specification."
   183      the UIPainter may not be able to read the specification."
   184 
   184 
   185     "
   185     "
   186      UIPainter new openOnClass:NoteBookApplication andSelector:#windowSpec
   186      UIPainter new openOnClass:FileApplicationNoteBook andSelector:#windowSpec
   187      NoteBookApplication new openInterface:#windowSpec
   187      FileApplicationNoteBook new openInterface:#windowSpec
   188      NoteBookApplication open
   188      FileApplicationNoteBook open
   189     "
   189     "
   190 
   190 
   191     <resource: #canvas>
   191     <resource: #canvas>
   192 
   192 
   193     ^ 
   193     ^ 
   194      #(#FullSpec
   194      #(FullSpec
   195         #name: #windowSpec
   195         name: windowSpec
   196         #window: 
   196         window: 
   197        #(#WindowSpec
   197        (WindowSpec
   198           #label: 'FileBrowserV2TextEditor'
   198           label: 'FileBrowserV2TextEditor'
   199           #name: 'FileBrowserV2TextEditor'
   199           name: 'FileBrowserV2TextEditor'
   200           #min: #(#Point 10 10)
   200           min: (Point 10 10)
   201           #max: #(#Point 1024 768)
   201           max: (Point 1024 768)
   202           #bounds: #(#Rectangle 16 42 316 342)
   202           bounds: (Rectangle 0 0 300 300)
   203         )
   203         )
   204         #component: 
   204         component: 
   205        #(#SpecCollection
   205        (SpecCollection
   206           #collection: #(
   206           collection: (
   207            #(#NoteBookViewSpec
   207            (NoteBookViewSpec
   208               #name: 'CommandAndTextEditor'
   208               name: 'CommandAndTextEditor'
   209               #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
   209               layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
   210               #model: #selectedEditorPage
   210               model: selectedEditorPage
   211               #menu: #tabList
   211               menu: tabList
   212               #useIndex: true
   212               useIndex: true
   213               #accessTabMenuAction: #tabMenuAt:
   213               accessTabMenuAction: tabMenuAt:
   214               #canvas: #canvasHolder
   214               destroyTabAction: destroyTab:
   215               #keepCanvasAlive: true
   215               canvas: canvasHolder
       
   216               keepCanvasAlive: true
   216             )
   217             )
   217            )
   218            )
   218          
   219          
   219         )
   220         )
   220       )
   221       )
   434     ].
   435     ].
   435 
   436 
   436     "/ because subCanvas was configured to keep its view,
   437     "/ because subCanvas was configured to keep its view,
   437     "/ we must destroy it here.
   438     "/ we must destroy it here.
   438     aApplication window destroy.
   439     aApplication window destroy.
       
   440 !
       
   441 
       
   442 destroyTab:tabIndex
       
   443     (self listOfApplications at:tabIndex) doClose
   439 !
   444 !
   440 
   445 
   441 doCloseAllApplications
   446 doCloseAllApplications
   442     | appl |
   447     | appl |
   443 
   448 
  5536 ! !
  5541 ! !
  5537 
  5542 
  5538 !FileApplicationNoteBook class methodsFor:'documentation'!
  5543 !FileApplicationNoteBook class methodsFor:'documentation'!
  5539 
  5544 
  5540 version
  5545 version
  5541     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.196 2006-01-17 12:17:01 cg Exp $'
  5546     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.197 2006-01-19 11:39:25 cg Exp $'
  5542 ! !
  5547 ! !