ImageEditor.st
changeset 1980 862d4036cebd
parent 1975 14b7babca4f5
child 1985 8c887bee94fa
equal deleted inserted replaced
1979:7b14d02e8ed1 1980:862d4036cebd
  3683 
  3683 
  3684     imageEditView checkModified ifTrue:[super closeRequest]
  3684     imageEditView checkModified ifTrue:[super closeRequest]
  3685 
  3685 
  3686 !
  3686 !
  3687 
  3687 
  3688 open
  3688 commonPostBuild
  3689     "after opening, sets the masterApplication of the imageEditView to self"
       
  3690 
       
  3691     super open.
       
  3692 
       
  3693     imageEditView := (self componentAt: #imageEditView) subViews first.
       
  3694 !
       
  3695 
       
  3696 postBuildWith:aBuilder
       
  3697     super postBuildWith:aBuilder.
       
  3698 
       
  3699     imageEditView undoImages addDependent:self.
  3689     imageEditView undoImages addDependent:self.
  3700     imageEditView imageInfoHolder:(self imageInfoHolder).
  3690     imageEditView imageInfoHolder:(self imageInfoHolder).
  3701     imageEditView activityInfoHolder:(self activityInfoHolder).
  3691     imageEditView activityInfoHolder:(self activityInfoHolder).
  3702 
  3692 
  3703     imageEditView clickInfoCallBack:[:button :point | 
  3693     imageEditView clickInfoCallBack:[:button :point | 
  3710 
  3700 
  3711     imageEditView addDependent:self.
  3701     imageEditView addDependent:self.
  3712     imageEditView modifiedHolder addDependent:self.
  3702     imageEditView modifiedHolder addDependent:self.
  3713 
  3703 
  3714     DefaultRelativeSizes notNil ifTrue:[
  3704     DefaultRelativeSizes notNil ifTrue:[
  3715         (aBuilder componentAt:#horizontalPanel) relativeCorners:DefaultRelativeSizes first.
  3705         (builder componentAt:#horizontalPanel) relativeCorners:DefaultRelativeSizes first.
  3716         (aBuilder componentAt:#verticalPanel) relativeCorners:DefaultRelativeSizes second.
  3706         (builder componentAt:#verticalPanel) relativeCorners:DefaultRelativeSizes second.
  3717     ].
  3707     ].
       
  3708 !
       
  3709 
       
  3710 open
       
  3711     "after opening, sets the masterApplication of the imageEditView to self"
       
  3712 
       
  3713     super open.
       
  3714 
       
  3715     imageEditView := (self componentAt: #imageEditView) subViews first.
       
  3716 !
       
  3717 
       
  3718 postBuildAsSubcanvasWith:aBuilder
       
  3719     super postBuildAsSubcanvasWith:aBuilder.
       
  3720     self commonPostBuild.
       
  3721 !
       
  3722 
       
  3723 postBuildWith:aBuilder
       
  3724     super postBuildWith:aBuilder.
       
  3725     self commonPostBuild.
  3718 !
  3726 !
  3719 
  3727 
  3720 postOpenWith:aBuilder
  3728 postOpenWith:aBuilder
  3721     "after opening, sets the masterApplication of the imageEditView to self;
  3729     "after opening, sets the masterApplication of the imageEditView to self;
  3722      evaluate the postOpenAction"
  3730      evaluate the postOpenAction"