1384 miniScrollerHorizontal: true |
1384 miniScrollerHorizontal: true |
1385 miniScrollerVertical: true |
1385 miniScrollerVertical: true |
1386 dataList: listOfColors |
1386 dataList: listOfColors |
1387 has3Dsepartors: true |
1387 has3Dsepartors: true |
1388 has3Dseparators: true |
1388 has3Dseparators: true |
|
1389 columnHolder: tableColumns |
1389 verticalSpacing: 1 |
1390 verticalSpacing: 1 |
1390 columns: |
1391 columns: |
1391 (OrderedCollection |
1392 (OrderedCollection |
1392 |
1393 |
1393 (DataSetColumnSpec |
1394 (DataSetColumnSpec |
2558 nil |
2559 nil |
2559 nil |
2560 nil |
2560 ) |
2561 ) |
2561 ! ! |
2562 ! ! |
2562 |
2563 |
|
2564 !ImageEditor class methodsFor:'tableColumns specs'! |
|
2565 |
|
2566 tableColumns |
|
2567 "This resource specification was automatically generated |
|
2568 by the DataSetBuilder of ST/X." |
|
2569 |
|
2570 "Do not manually edit this!! If it is corrupted, |
|
2571 the DataSetBuilder may not be able to read the specification." |
|
2572 |
|
2573 " |
|
2574 DataSetBuilder new openOnClass:ImageEditor andSelector:#tableColumns |
|
2575 " |
|
2576 |
|
2577 <resource: #tableColumns> |
|
2578 |
|
2579 ^#( |
|
2580 (DataSetColumnSpec |
|
2581 labelButtonType: Button |
|
2582 rendererType: rowSelector |
|
2583 backgroundSelector: theColorItSelf: |
|
2584 selectedBackgroundSelector: theColorItSelf: |
|
2585 isResizeable: false |
|
2586 ) |
|
2587 (DataSetColumnSpec |
|
2588 label: 'R' |
|
2589 labelAlignment: left |
|
2590 labelButtonType: Button |
|
2591 columnAlignment: right |
|
2592 editorType: InputField |
|
2593 type: number |
|
2594 model: redFromColor: |
|
2595 writeSelector: redAtColor:put: |
|
2596 selectSelector: canSelectRedInColor: |
|
2597 ) |
|
2598 (DataSetColumnSpec |
|
2599 label: 'G' |
|
2600 labelAlignment: left |
|
2601 labelButtonType: Button |
|
2602 columnAlignment: right |
|
2603 editorType: InputField |
|
2604 type: number |
|
2605 model: greenFromColor: |
|
2606 writeSelector: greenAtColor:put: |
|
2607 selectSelector: canSelectGreenInColor: |
|
2608 ) |
|
2609 (DataSetColumnSpec |
|
2610 label: 'B' |
|
2611 labelAlignment: left |
|
2612 labelButtonType: Button |
|
2613 columnAlignment: right |
|
2614 editorType: InputField |
|
2615 type: number |
|
2616 model: blueFromColor: |
|
2617 writeSelector: blueAtColor:put: |
|
2618 selectSelector: canSelectBlueInColor: |
|
2619 ) |
|
2620 ) |
|
2621 |
|
2622 ! ! |
|
2623 |
2563 !ImageEditor methodsFor:'accessing'! |
2624 !ImageEditor methodsFor:'accessing'! |
2564 |
2625 |
2565 image |
2626 image |
2566 "returns the current editing image" |
2627 "returns the current editing image" |
2567 |
2628 |
2855 self imagePreView invalidate:aParameter. |
2916 self imagePreView invalidate:aParameter. |
2856 ]. |
2917 ]. |
2857 ^ self. |
2918 ^ self. |
2858 ]. |
2919 ]. |
2859 something == #selectedColor ifTrue:[ |
2920 something == #selectedColor ifTrue:[ |
2860 (aParameter = (Color colorId:0)) ifTrue:[ |
2921 (aParameter isNil or:[aParameter = (Color colorId:0)]) ifTrue:[ |
2861 self halt. |
2922 "/ no color/mask */ |
|
2923 "/ self halt. |
|
2924 clrIndex := self hasMask ifTrue:[1] ifFalse:[0]. |
|
2925 ] ifFalse:[ |
|
2926 clrIndex := self listOfColors indexOf:aParameter. |
2862 ]. |
2927 ]. |
2863 clrIndex := self listOfColors indexOf:aParameter. |
|
2864 self selectionOfColor value:clrIndex. |
2928 self selectionOfColor value:clrIndex. |
2865 ^ self. |
2929 ^ self. |
2866 ]. |
2930 ]. |
2867 ^ self. |
2931 ^ self. |
2868 ]. |
2932 ]. |