The last parameter can be defined one of the way shown below depending on how you create a DevMode structure.

DECLARE Integer PESelectPrinter IN crpe32.dll ;
		Long printJob, String PrinterDriver, ;
		String PrinterName, String PortName, ;
		Long @ DevMode 
* OR
DECLARE Integer PESelectPrinter IN crpe32.dll ;
		Long printJob, String PrinterDriver, ;
		String PrinterName, String PortName, ;
		String @ DevMode 

>Hi All,
>
>How to translate this VB Function in VFP ?
>A example ?
>
>

>Declare Function PESelectPrinter Lib "crpe32.dll" (ByVal
>printJob%, ByVal PrinterDriver$, ByVal PrinterName$, ByVal
>PortName$, DevMode As Any) As Integer
>

>
>PrintJob Specifies the handle to the print job for which you want to select a printer.
>PrinterDriver Specifies a pointer to a null-terminated string that contains the name of the printer driver for the selected
>
>Crystal Reports DEVMODE printer.
>printerName Specifies a pointer to a null-terminated string that contains the printer name for the selected printer.
>PortName Specifies a pointer to a null-terminated string that contains the port name for the port to which the selected
>printer is attached.
>DevMode Specifies a pointer to the Windows API structure DEVMODE.
>
>Thanks in advance for help
>
>bernhart