Where is the problem?
|directory exporter |
directory := FileSystem workingDirectory / 'pictures' .
directory ensureCreateDirectory.
exporter := DOScreenshotExporter new.
exporter directory: directory.
exporter writeWorldAs: 'world.png'.
with
DOScreenshotExporter>>writeWorldAs: aFileName
(directory / aFileName) ensureDelete.
PNGReadWriter putForm: World imageForm onFileNamed: (directory / aFileName).
though this form might not work
DOScreenshotExporter>>writeMorph: aMorph rectangle: aRectangle as: aFileName
(directory / aFileName) ensureDelete.
PNGReadWriter putForm: (aMorph imageFormForRectangle: aRectangle) onFileNamed: (directory / aFileName).
_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev