Advertisement
bousaid

Print Demo

Jun 22nd, 2021
357
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. PROCEDURE Print_Demo()
  2.  
  3. // Impression d'un filigrane en fond d'un état
  4. MonFiligrane is a Watermark
  5. // Texte du filigrane
  6. MonFiligrane..Text = "Demo"
  7. // Police utilisée
  8. MonFiligrane..Font..Name = "Arial"
  9. // Le filigrane sera imprimé en centré horizontalement et en bas
  10. MonFiligrane..Position = iCenterH + iCenterV
  11. // Indique que le filigrane sera imprimé lors de l'impression et dans les duplicatas
  12. iParameterWatermark(iWatermarkPrinting + iWatermarkDuplicate , MonFiligrane)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement