Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-12-2013
[Waldo] Waldo is offline
Miembro Premium
 
Registrado: sep 2003
Posts: 101
Poder: 21
Waldo Va por buen camino
Problemas con shellexecute

Buen día y felices fiestas.

Tengo un problema con la impresión de un documento pdf, curiosamente funciona en una pc y en la otra no. con el siguiente codigo.
Código Delphi [-]
  FOR i:=1 TO copias DO
            BEGIN
               dd:=G.Empresa_CaminoImportarCFDI+'\'+FOLIOELECTRONICO.Prefix+edit_folio.Text+'.pdf';
               codigoerror:=shellExecute(Self.Handle,'print',PChar(G.Empresa_CaminoImportarCFDI+'\'+FOLIOELECTRONIC  O.Prefix+edit_folio.Text+'.pdf'),NIL,NIL,0);
               CASE codigoerror OF
                  0:ShowMessage('The operating system is out of memory or resources. ');
                  2:showmessage('file not found');
                  3:showmessage('path not found');
                  5:showmessage('access denied');
                  8:showmessage('not enough memory');
                  10:showmessage('Wrong Windows version');
                  11:showmessage('The .EXE file is invalid (non-Win32 .EXE or error in .EXE image)');
                  12:showmessage('Application was designed for a different operating system');
                  13:showmessage('Application was designed for MS-DOS 4.0');
                  15:showmessage('Attempt to load a real-mode program');
                  16:showmessage('Attempt to load a second instance of an application with non-readonly data segments.');
                  19:showmessage('Attempt to load a compressed application file.');
                  20:showmessage('Dynamic-link library (DLL) file failure.');
                  26:showmessage('sharing violation');
                  27:showmessage('filename association incomplete or invalid');
                  28:showmessage('DDE request timed out');
                  29:showmessage('DDE transaction failed');
                  30:showmessage('DDE busy');
                  31:showmessage('no application associated with the given filename extension');
                  32:showmessage('dynamic-link library not found');
               END;

               //PrintPDF(dd);
            END;

Por lo que ya descarte que este asociado con un programa lector de pdf, asi como también e descubierto que solo imprime una vez, y una vez que se creo el proceso, ya no se puede ejecutar ni siquiera acrobat reader por separado sin antes terminar el proceso. Ojala me ayuden creo que debo matar ese proceso cada vez que deseo ejecutar la impresión con el shellexecute. de antemano gracias.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problemas con ShellExecute ninguno C++ Builder 3 08-09-2008 20:45:38
Problemas con ShellExecute ZayDun Varios 4 27-03-2008 22:33:47
Shellexecute mjjj Varios 2 11-09-2007 17:41:21
Problemas con ShellExecute y Java. tryasta API de Windows 2 05-09-2005 19:09:41
Problemas con ShellExecute: lalo Varios 2 18-03-2005 15:04:52


La franja horaria es GMT +2. Ahora son las 19:07:22.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi