equal
deleted
inserted
replaced
57 " |
57 " |
58 ! ! |
58 ! ! |
59 |
59 |
60 !ImageEditor class methodsFor:'instance creation'! |
60 !ImageEditor class methodsFor:'instance creation'! |
61 |
61 |
62 openLoadingImageWith:aBlock |
62 openLoadingImageWith:aBlock modal:modalBoolean |
63 "opens an Image Editor on anImage" |
63 "opens an Image Editor on anImage" |
64 |
64 |
65 |editor| |
65 |editor| |
66 |
66 |
67 editor := self new. |
67 editor := self new. |
68 editor allButOpen. |
68 editor allButOpen. |
69 aBlock value:editor. |
69 aBlock value:editor. |
70 editor openWindow. |
70 modalBoolean ifTrue:[ |
|
71 editor openWindowModal. |
|
72 ] ifFalse:[ |
|
73 editor openWindow. |
|
74 ]. |
71 ^ editor |
75 ^ editor |
72 ! |
76 ! |
73 |
77 |
74 openModalOnClass: aClass andSelector: aSelector |
78 openModalOnClass: aClass andSelector: aSelector |
75 "opens a modal Image Editor on aClass and aSelector. |
79 "opens a modal Image Editor on aClass and aSelector. |
95 (resourceClass isNil or:[resourceSelector isNil]) ifTrue:[^ nil]. |
99 (resourceClass isNil or:[resourceSelector isNil]) ifTrue:[^ nil]. |
96 ^ Array with:resourceClass with:resourceSelector |
100 ^ Array with:resourceClass with:resourceSelector |
97 |
101 |
98 " |
102 " |
99 self openModalOnClass: self andSelector: #leftMouseKeyIcon |
103 self openModalOnClass: self andSelector: #leftMouseKeyIcon |
|
104 " |
|
105 ! |
|
106 |
|
107 openModalOnFile:aFileName |
|
108 "opens an Image Editor on aFileName" |
|
109 |
|
110 self openLoadingImageWith:[:editor | |
|
111 editor loadFromFile:aFileName. |
|
112 ] modal:true. |
|
113 |
|
114 " |
|
115 self openModalOnFile: '../../goodies/bitmaps/gifImages/back.gif' |
100 " |
116 " |
101 ! |
117 ! |
102 |
118 |
103 openModalOnImage:anImage |
119 openModalOnImage:anImage |
104 "opens a modal Image Editor on an image. |
120 "opens a modal Image Editor on an image. |
121 openOnClass:aClass andSelector:aSelector |
137 openOnClass:aClass andSelector:aSelector |
122 "opens an Image Editor on aClass and aSelector" |
138 "opens an Image Editor on aClass and aSelector" |
123 |
139 |
124 self openLoadingImageWith:[:editor | |
140 self openLoadingImageWith:[:editor | |
125 editor loadFromClass:aClass theNonMetaclass andSelector:aSelector. |
141 editor loadFromClass:aClass theNonMetaclass andSelector:aSelector. |
126 ] |
142 ] modal:false. |
127 |
143 |
128 " |
144 " |
129 self openOnClass:self andSelector:#leftMouseKeyIcon |
145 self openOnClass:self andSelector:#leftMouseKeyIcon |
130 self openOnClass:self andSelector:nil |
146 self openOnClass:self andSelector:nil |
131 " |
147 " |
136 openOnFile:aFileName |
152 openOnFile:aFileName |
137 "opens an Image Editor on aFileName" |
153 "opens an Image Editor on aFileName" |
138 |
154 |
139 self openLoadingImageWith:[:editor | |
155 self openLoadingImageWith:[:editor | |
140 editor loadFromFile:aFileName. |
156 editor loadFromFile:aFileName. |
141 ] |
157 ] modal:false. |
142 |
158 |
143 " |
159 " |
144 self openOnFile: '../../goodies/bitmaps/gifImages/back.gif' |
160 self openOnFile: '../../goodies/bitmaps/gifImages/back.gif' |
145 " |
161 " |
146 |
162 |
150 openOnImage:anImage |
166 openOnImage:anImage |
151 "opens an Image Editor on anImage" |
167 "opens an Image Editor on anImage" |
152 |
168 |
153 self openLoadingImageWith:[:editor | |
169 self openLoadingImageWith:[:editor | |
154 editor loadFromImage: anImage. |
170 editor loadFromImage: anImage. |
155 ] |
171 ] modal:false |
156 |
172 |
157 " |
173 " |
158 self openOnImage: Icon startIcon |
174 self openOnImage: Icon startIcon |
159 " |
175 " |
160 |
176 |