equal
deleted
inserted
replaced
2470 super initialize. |
2470 super initialize. |
2471 |
2471 |
2472 selectedColumnIndex := 0. |
2472 selectedColumnIndex := 0. |
2473 columns := OrderedCollection new. |
2473 columns := OrderedCollection new. |
2474 modalOpened := false. |
2474 modalOpened := false. |
2475 noteBook := View new. |
|
2476 |
|
2477 listOfSpecViews := Array new:(1 + self class slices size). |
|
2478 listOfSpecViews at:1 put:(View origin:0.0@0.0 corner:1.0@1.0 in:noteBook). |
|
2479 |
2475 |
2480 ! ! |
2476 ! ! |
2481 |
2477 |
2482 !DataSetBuilder methodsFor:'private'! |
2478 !DataSetBuilder methodsFor:'private'! |
2483 |
2479 |
2589 tabSelection:something |
2585 tabSelection:something |
2590 "changes selected tab and set corresponding specification" |
2586 "changes selected tab and set corresponding specification" |
2591 |
2587 |
2592 |specSelector view spec| |
2588 |specSelector view spec| |
2593 |
2589 |
2594 something == tabSelection ifTrue:[^self]. |
2590 (noteBook isNil or:[something == tabSelection]) ifTrue:[^self]. |
2595 |
2591 |
2596 self selectedColumn isNil ifTrue:[ |
2592 self selectedColumn isNil ifTrue:[ |
2597 tabSelection == 0 ifTrue:[^self]. |
2593 tabSelection == 0 ifTrue:[^self]. |
2598 tabSelection := 0 |
2594 tabSelection := 0 |
2599 ] ifFalse:[ |
2595 ] ifFalse:[ |
3014 !DataSetBuilder methodsFor:'values'! |
3010 !DataSetBuilder methodsFor:'values'! |
3015 |
3011 |
3016 noteBook |
3012 noteBook |
3017 "returns the noteBook widget |
3013 "returns the noteBook widget |
3018 " |
3014 " |
|
3015 noteBook isNil ifTrue:[ |
|
3016 noteBook := View new. |
|
3017 listOfSpecViews := Array new:(1 + self class slices size). |
|
3018 listOfSpecViews at:1 put:(View origin:0.0@0.0 corner:1.0@1.0 in:noteBook). |
|
3019 ]. |
3019 ^ noteBook |
3020 ^ noteBook |
3020 |
|
3021 ! ! |
3021 ! ! |
3022 |
3022 |
3023 !DataSetBuilder::Row methodsFor:'accessing'! |
3023 !DataSetBuilder::Row methodsFor:'accessing'! |
3024 |
3024 |
3025 choices |
3025 choices |