ImageEditor.st
changeset 1597 b670ad8c30e1
parent 1583 c21cb650b2a0
child 1598 d748419672a3
equal deleted inserted replaced
1596:be79a5a5e8e4 1597:b670ad8c30e1
  1881 !ImageEditor methodsFor:'accessing-views'!
  1881 !ImageEditor methodsFor:'accessing-views'!
  1882 
  1882 
  1883 colorDataSetView
  1883 colorDataSetView
  1884     "returns the view of the colormap"
  1884     "returns the view of the colormap"
  1885 
  1885 
  1886     ^(builder componentAt: #colorDataSetView)
  1886     ^(self componentAt: #colorDataSetView)
  1887 
  1887 
  1888     "Created: / 26.7.1998 / 12:02:14 / cg"
  1888     "Created: / 26.7.1998 / 12:02:14 / cg"
  1889 !
  1889 !
  1890 
  1890 
  1891 coordLabel
  1891 coordLabel
  1892     "returns the view the coord label"
  1892     "returns the view the coord label"
  1893 
  1893 
  1894     ^builder componentAt: #coordLabel
  1894     ^self componentAt: #coordLabel
  1895 !
  1895 !
  1896 
  1896 
  1897 imageEditView
  1897 imageEditView
  1898     "returns the view of the image"
  1898     "returns the view of the image"
  1899 
  1899 
  1900     imageEditView isNil ifTrue:[
  1900     imageEditView isNil ifTrue:[
  1901         imageEditView := (builder componentAt: #imageEditView) scrolledView.
  1901         imageEditView := (self componentAt: #imageEditView) scrolledView.
  1902         imageEditView addDependent:self.
  1902         imageEditView addDependent:self.
  1903     ].
  1903     ].
  1904     ^ imageEditView
  1904     ^ imageEditView
  1905 
  1905 
  1906     "Modified: / 10.2.2000 / 23:19:20 / cg"
  1906     "Modified: / 10.2.2000 / 23:19:20 / cg"
  1907 !
  1907 !
  1908 
  1908 
  1909 imagePreView
  1909 imagePreView
  1910     "returns the preview of the image"
  1910     "returns the preview of the image"
  1911 
  1911 
  1912     ^ (builder componentAt: #imagePreView) subViews first 
  1912     ^ (self componentAt: #imagePreView) subViews first 
  1913 ! !
  1913 ! !
  1914 
  1914 
  1915 !ImageEditor methodsFor:'aspects'!
  1915 !ImageEditor methodsFor:'aspects'!
  1916 
  1916 
  1917 activityInfoHolder
  1917 activityInfoHolder
  2512 open
  2512 open
  2513     "after opening, sets the masterApplication of the imageEditView to self"
  2513     "after opening, sets the masterApplication of the imageEditView to self"
  2514 
  2514 
  2515     super open.
  2515     super open.
  2516 
  2516 
  2517     imageEditView := (builder componentAt: #imageEditView) subViews first.
  2517     imageEditView := (self componentAt: #imageEditView) subViews first.
  2518 !
  2518 !
  2519 
  2519 
  2520 postOpenWith:aBuilder
  2520 postOpenWith:aBuilder
  2521     "after opening, sets the masterApplication of the imageEditView to self;
  2521     "after opening, sets the masterApplication of the imageEditView to self;
  2522      evaluate the postOpenAction"
  2522      evaluate the postOpenAction"
  2525     imageEditView imageInfoHolder:(self imageInfoHolder).
  2525     imageEditView imageInfoHolder:(self imageInfoHolder).
  2526     imageEditView activityInfoHolder:(self activityInfoHolder).
  2526     imageEditView activityInfoHolder:(self activityInfoHolder).
  2527     imageEditView clickInfoCallBack:[:button :point | 
  2527     imageEditView clickInfoCallBack:[:button :point | 
  2528                         |mouseButtonColorToolBar|
  2528                         |mouseButtonColorToolBar|
  2529 
  2529 
  2530                         mouseButtonColorToolBar := builder componentAt:#MouseButtonColorToolBar.
  2530                         mouseButtonColorToolBar := self componentAt:#MouseButtonColorToolBar.
  2531                         (mouseButtonColorToolBar itemAt:button) toggleIndication.
  2531                         (mouseButtonColorToolBar itemAt:button) toggleIndication.
  2532                         mouseButtonColorToolBar do: [:i| i updateIndicators].
  2532                         mouseButtonColorToolBar do: [:i| i updateIndicators].
  2533                   ].
  2533                   ].
  2534     imageEditView addDependent:self.
  2534     imageEditView addDependent:self.
  2535 
  2535