Extracting and printing an image from an image control


/ Published in: Other
Save to your folder(s)

This is code from Stefan Bentvelsen given in a forum posting


Copy this code and paste it in your HTML
  1. you can extract the original file name as follows:
  2.  
  3. sHlp=HInfoMemo(MyFile,element)
  4. lsFilename=ExtractString(sHlp,2)
  5.  
  6. But I use the following code to print an image direct from a binary memo:
  7.  
  8. sHlp is string
  9.  
  10. sHlp=HInfoMemo(MyFile,element) // where element is the memofield
  11. IF ExtractString(sHlp,1)="IMG" THEN
  12. ...iPrintImage(MyFile.element,0,iYPos(),iPageWidth(),iPageHeight(),0)
  13. END

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.