local f = createForm()
local p = createImage(f)
local s = findTableFile('ce.png')
if not s then
showMessage('Not found')
return
else
p.Picture.loadFromStream(s.Stream)
p.Stretch = true
local path = TrainerOrigin or getMainForm()
local dialog=createSaveDialog()
dialog.DefaultExt =".png"
dialog.Filter = "PNG Image (*.png)|*.png"
dialog.FilterIndex = 1
dialog.Options = '[ofOverwritePrompt, ofEnableSizing]'
if dialog.execute() then p.Picture.saveToFile(dialog.Filename) end
dialog.destroy()
end
_________________
Stealing Code From Stolen Code...
And Admit It.. Hmmm....Typically LOL
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You cannot attach files in this forum You can download files in this forum