LiveCode Forums.

Code: Select all

on mouseDown
   set the visible of image "TEST" to true
   
   put the screenrect into blah
   put specialFolderPath("documents") & slash & "Nav.jpg" into GEST
   
   export snapshot from rect blah to file GEST as JPEG   
   
   put "binfile:"&GEST into POL
   put URL POL into image "TEST"
   
   set the angle of image "TEST" to 270
   
   //SAVE IMAGE CODE HERE
   
   put specialFolderPath("documents") & slash & "NavYY.jpg" into GEST1
   put "binfile:"&GEST1 into HYU
   export image "TEST" to URL HYU
   
   //
   
   set the URL of widget "Browser" to GEST1
   
end mouseDown

Code: Select all

on mouseUp
   answer file "Select image:"
   if the result is not cancel then
      import paint from file it
      set the name of the last control to "XYZ"
   end if
   set the left of img "XYZ" to 10
   clone img "XYZ"
   set the name of the last control to "XXX"
   set the loc of img "XXX" to 600,200
   set the angle of img "XXX" to 270
   ----
    ask file "Choose where you wish to save your image"if the result = "cancel" 
  then exit mouseUp
  else
   export snapshot from img "XXX" to file it & ".png" as PNG
end if
delete img "XYZ"
delete img "XXX"
end mouseUp

Code: Select all

 If you don't specify a format, the file is exported as PBM, PGM, or PPM.