Hi,
we have the PDF-Printer "eDocPrintPro" in use.
We can activate and access the ole-Object with the following code in Progress (9.1d):
This reads the settings for the PDF-Printer and works fine.
In the Example-VB-Code from the PDF-Printer-Company are also some events:
Events:
OnStartDocPort
parameters: none
comments: the event is raised before the printing and can be used for printer customization
OnEndDocPort
parameters: none
comments: the event is raised after finishing the output files creation and can be used for post processing
Now my question:
How can I implement these events in progress?
Thanks for any help.
Greets
storzi
we have the PDF-Printer "eDocPrintPro" in use.
We can activate and access the ole-Object with the following code in Progress (9.1d):
Code:
DEF VAR edoc AS COM-HANDLE NO-UNDO.
DEF VAR actionpage AS COM-HANDLE NO-UNDO.
DEF VAR destinationpage AS COM-HANDLE NO-UNDO.
DEF VAR layoutpage AS COM-HANDLE.
CREATE "eDocPort.port" edoc.
IF VALID-HANDLE(edoc) THEN DO:
/* EDOCPRINTER ERMITTELN */
pcount = edoc:getprinterscount().
edocprinter = edoc:getprinternamefromindex(pcount).
/* EDOCPRINT HANDLES ZUWEISEN */
actionpage = edoc:getactionpage(edocprinter).
destinationpage = edoc:getdestinationpage(edocprinter).
layoutpage = edoc:getlayoutpage(edocprinter).
/* AKTUELLE EDOCPRINTPRO EINSTELLUNGEN ZUWEISEN */
actionpage:readsettings().
destinationpage:readsettings().
layoutpage:readsettings().
end.
In the Example-VB-Code from the PDF-Printer-Company are also some events:
Events:
OnStartDocPort
parameters: none
comments: the event is raised before the printing and can be used for printer customization
OnEndDocPort
parameters: none
comments: the event is raised after finishing the output files creation and can be used for post processing
Now my question:
How can I implement these events in progress?
Thanks for any help.
Greets
storzi