equal
deleted
inserted
replaced
1430 ! |
1430 ! |
1431 |
1431 |
1432 imageEditView |
1432 imageEditView |
1433 "returns the view of the image" |
1433 "returns the view of the image" |
1434 |
1434 |
1435 ^imageEditView := (builder componentAt: #imageEditView) subViews first |
1435 ^ imageEditView := (builder componentAt: #imageEditView) scrolledView |
|
1436 |
|
1437 "Modified: / 10.2.2000 / 23:19:20 / cg" |
1436 ! |
1438 ! |
1437 |
1439 |
1438 imagePreView |
1440 imagePreView |
1439 "returns the preview of the image" |
1441 "returns the preview of the image" |
1440 |
1442 |
1608 changedObject == imageEditView undoImages ifTrue:[ |
1610 changedObject == imageEditView undoImages ifTrue:[ |
1609 self valueOfCanUndo value:(changedObject notEmpty). |
1611 self valueOfCanUndo value:(changedObject notEmpty). |
1610 ^ self. |
1612 ^ self. |
1611 ]. |
1613 ]. |
1612 |
1614 |
|
1615 changedObject == imageEditView ifTrue:[ |
|
1616 something == #imageColors ifTrue:[ |
|
1617 self listOfColors contents:self image colorMap. |
|
1618 self findColorMapMode. |
|
1619 ^ self. |
|
1620 ]. |
|
1621 something == #image ifTrue:[ |
|
1622 self imagePreView image:self image. |
|
1623 ^ self. |
|
1624 ]. |
|
1625 something == #subImageIn ifTrue:[ |
|
1626 self imagePreView redraw:aParameter. |
|
1627 ^ self. |
|
1628 ]. |
|
1629 |
|
1630 ^ self. |
|
1631 ]. |
|
1632 |
|
1633 changedObject == imageEditView image ifTrue:[ |
|
1634 self halt. |
|
1635 ^ self. |
|
1636 ]. |
|
1637 |
1613 super update:something with:aParameter from:changedObject |
1638 super update:something with:aParameter from:changedObject |
1614 |
1639 |
1615 "Modified: / 18.8.1998 / 17:18:42 / cg" |
1640 "Modified: / 10.2.2000 / 23:36:49 / cg" |
1616 ! |
1641 ! |
1617 |
1642 |
1618 updateForNoImage |
1643 updateForNoImage |
1619 "updates channels and view, if image is loaded" |
1644 "updates channels and view, if image is loaded" |
1620 |
1645 |
1868 ! |
1893 ! |
1869 |
1894 |
1870 mouseKeyColorMode |
1895 mouseKeyColorMode |
1871 "returns mouseKeyColorMode" |
1896 "returns mouseKeyColorMode" |
1872 |
1897 |
1873 mouseKeyColorMode isNil |
1898 mouseKeyColorMode isNil ifTrue:[ |
1874 ifTrue: |
|
1875 [ |
|
1876 mouseKeyColorMode := 1 asValue. |
1899 mouseKeyColorMode := 1 asValue. |
1877 mouseKeyColorMode onChangeEvaluate: [imageEditView mouseKeyColorMode: mouseKeyColorMode value. self selectionOfColor value: (self listOfColors indexOf: imageEditView selectedColor).] |
1900 mouseKeyColorMode onChangeEvaluate: [ |
|
1901 imageEditView mouseKeyColorMode:mouseKeyColorMode value. |
|
1902 self selectionOfColor value: (self listOfColors indexOf:imageEditView selectedColor). |
|
1903 ] |
1878 ]. |
1904 ]. |
1879 |
1905 |
1880 ^mouseKeyColorMode |
1906 ^mouseKeyColorMode |
|
1907 |
|
1908 "Modified: / 10.2.2000 / 23:16:42 / cg" |
1881 ! ! |
1909 ! ! |
1882 |
1910 |
1883 !ImageEditor methodsFor:'queries'! |
1911 !ImageEditor methodsFor:'queries'! |
1884 |
1912 |
1885 hasMask |
1913 hasMask |
1967 |
1995 |
1968 imageEditView masterApplication: self. |
1996 imageEditView masterApplication: self. |
1969 imageEditView undoImages addDependent:self. |
1997 imageEditView undoImages addDependent:self. |
1970 imageEditView imageInfoHolder:(self imageInfoHolder). |
1998 imageEditView imageInfoHolder:(self imageInfoHolder). |
1971 imageEditView activityInfoHolder:(self activityInfoHolder). |
1999 imageEditView activityInfoHolder:(self activityInfoHolder). |
|
2000 imageEditView clickInfoCallBack:[:button :point | |
|
2001 |mouseButtonColorToolBar| |
|
2002 |
|
2003 mouseButtonColorToolBar := builder componentAt:#MouseButtonColorToolBar. |
|
2004 (mouseButtonColorToolBar itemAt:button) toggleIndication. |
|
2005 mouseButtonColorToolBar do: [:i| i updateIndicators]. |
|
2006 ]. |
|
2007 imageEditView addDependent:self. |
1972 |
2008 |
1973 postOpenAction notNil ifTrue: [postOpenAction value]. |
2009 postOpenAction notNil ifTrue: [postOpenAction value]. |
1974 |
2010 |
1975 super postOpenWith:aBuilder. |
2011 super postOpenWith:aBuilder. |
1976 |
2012 |
1977 aBuilder keyboardProcessor menuBar:nil. |
2013 aBuilder keyboardProcessor menuBar:nil. |
1978 |
2014 |
1979 "Modified: / 29.7.1998 / 18:49:20 / cg" |
2015 "Modified: / 10.2.2000 / 23:17:43 / cg" |
1980 ! ! |
2016 ! ! |
1981 |
2017 |
1982 !ImageEditor methodsFor:'user actions - colormap'! |
2018 !ImageEditor methodsFor:'user actions - colormap'! |
1983 |
2019 |
1984 addColorToColormap |
2020 addColorToColormap |