DECLARE INTEGER ShellExecute IN shell32.dll ;
INTEGER hndWin, ;
STRING cAction, ;
STRING cFileName, ;
STRING cParams, ;
STRING cDir, ;
INTEGER nShowWin
cFileName = "D:\TEST.PDF"
cAction = "print"
ShellExecute(0,cAction,cFileName,"","",0)
CLEAR DLLS ShellExecute