Graphics]), selecting it using a single click, then clicking the Preview button. You can try it by creating a graphic in the same notebook (e.g. In case you are wondering why I used a nested With inside the Module instead of making img a module-variable too: it's because by the time doIt is evaluated, the local module variables will have been cleared, so I need to substitute the rasterized expression directly into the doIt function, This is what I have so far (includes only the preview code, not the uploader): button = Button[Ĭolumn[ Before uploading, I would like to show a preview of the image, to reduce the chance of something going awry before contacting the server.

I would like to create a palette button that will upload the current notebook selection as an image. This problem came up when I was trying to make a preview window for an image uploader (see the end of that answer).

It does allow setting the rasterization width though. My answer should work on any platform, but it's less precise: e.g. Update Mr Wizard's answer gives pixel-perfect results, but it is Windows-only and destroys the clipboard contents.

Wolfram notebook