Código Delphi [-]ShellExecute(Self.Handle,'print',PChar('archivo.pdf'),NIL,NIL,0);
ShellExecute(Self.Handle,'print',PChar('archivo.pdf'),NIL,NIL,0);