Gracias Martin.

Puse la clase _environ.vcx y la siguiente instruccion THISFORM._shellexecute1.shellexecute ('C:\PROGRAMAS\NOMINAS\cuerpo.pdf',,'print') y me funciono a la perfeccion y si la quiero visualizar THISFORM._shellexecute1.shellexecute ('C:\PROGRAMAS\NOMINAS\cuerpo.pdf',,'open')