psDevmodeDeviceName - cPrintDialog¶
Type¶
String
Default¶
Empty string
Arguments¶
None
Description¶
Contains the short name of the device. Filled by ReadDevMode.
Sample¶
Object oReport is a cDRReport
Set psReportName to 'MyReport.dr'
End_Object
Procedure ShowPrinterDeviceName
Handle hoPrintDialog
Integer eResult
String sDeviceName
Get phoPrintDialog of oReport to hoPrintDialog
Get PrintDialog of hoPrintDialog to eResult
Get psDevmodeDeviceName of hoPrintDialog to sDeviceName
End_Procedure