equal
deleted
inserted
replaced
9233 filter:{ |
9233 filter:{ |
9234 {(resources string:'Image Files'). '*.tif;*.png;*.gif;*.bmp;*.jpg'}. |
9234 {(resources string:'Image Files'). '*.tif;*.png;*.gif;*.bmp;*.jpg'}. |
9235 {(resources string:'All Files'). '*.*'} |
9235 {(resources string:'All Files'). '*.*'} |
9236 } |
9236 } |
9237 filterIndex:nil |
9237 filterIndex:nil |
9238 doSave:false. |
9238 trueForSave:false |
|
9239 trueForPromptOverwrite:false. |
9239 ]. |
9240 ]. |
9240 ] ifFalse:[ |
9241 ] ifFalse:[ |
9241 filters := FileSelectionBrowser loadImageFileNameFilters. |
9242 filters := FileSelectionBrowser loadImageFileNameFilters. |
9242 file notNil ifTrue:[ |
9243 file notNil ifTrue:[ |
9243 file := FileSelectionBrowser |
9244 file := FileSelectionBrowser |
9256 LastDirectory := file asFilename directoryName. |
9257 LastDirectory := file asFilename directoryName. |
9257 self loadFromFile:file |
9258 self loadFromFile:file |
9258 ] |
9259 ] |
9259 |
9260 |
9260 "Modified: / 16-02-2017 / 10:53:41 / cg" |
9261 "Modified: / 16-02-2017 / 10:53:41 / cg" |
9261 "Modified: / 23-10-2018 / 10:02:51 / sr" |
9262 "Modified: / 24-10-2018 / 13:16:05 / sr" |
9262 ! |
9263 ! |
9263 |
9264 |
9264 doLoadFromURL |
9265 doLoadFromURL |
9265 "opens a dialog for loading an image from a URL" |
9266 "opens a dialog for loading an image from a URL" |
9266 |
9267 |
9576 filter:{ |
9577 filter:{ |
9577 {(resources string:'Image Files'). '*.tif;*.png;*.gif;*.bmp'}. |
9578 {(resources string:'Image Files'). '*.tif;*.png;*.gif;*.bmp'}. |
9578 {(resources string:'All Files'). '*.*'} |
9579 {(resources string:'All Files'). '*.*'} |
9579 } |
9580 } |
9580 filterIndex:nil |
9581 filterIndex:nil |
9581 doSave:true. |
9582 trueForSave:true |
|
9583 trueForPromptOverwrite:true. |
9582 ]. |
9584 ]. |
9583 ] ifFalse:[ |
9585 ] ifFalse:[ |
9584 img fileName isNil ifTrue:[ |
9586 img fileName isNil ifTrue:[ |
9585 LastDirectory notNil ifTrue:[ |
9587 LastDirectory notNil ifTrue:[ |
9586 file isNil ifTrue:[ |
9588 file isNil ifTrue:[ |
9621 self updateLabelsAndHistory. |
9623 self updateLabelsAndHistory. |
9622 self clearModifiedAndRememberImageSavedAsFile:file. |
9624 self clearModifiedAndRememberImageSavedAsFile:file. |
9623 ] |
9625 ] |
9624 |
9626 |
9625 "Modified: / 27-02-2017 / 01:26:05 / cg" |
9627 "Modified: / 27-02-2017 / 01:26:05 / cg" |
9626 "Modified: / 23-10-2018 / 10:02:44 / sr" |
9628 "Modified: / 24-10-2018 / 13:16:14 / sr" |
9627 ! |
9629 ! |
9628 |
9630 |
9629 doSaveImageMaskFileAs |
9631 doSaveImageMaskFileAs |
9630 "opens a dialog for saving mask of current image to a file" |
9632 "opens a dialog for saving mask of current image to a file" |
9631 |
9633 |