Complementando a resposta anterior, segue abaixo o comando que funcionaria em
meu sistema:
Windows XP Pro SP2
Office 2003 Pro
ShellExecute(Application.Handle, 'printto','C:\imagens\imagem.jpg',nil, nil,
SW_SHOWNORMAL);
OBS - Meu sistema não possui nenhuma impressora instalada, e a que está
definida como padrão é "Microsoft Office Document Writer".
Veja a descrição do documento JPG em "Tipos de Documentos":
Ação: printto
Comando: rundll32.exe C:\WINNT\system32\shimgvw.dll,ImageView_PrintTo /pt "%1"
"%2" "%3" "%4"
Usar DDE: sim (checado)
Mensagem DDE: vazio
Aplicativo: shimgvw
Aplicativo DDE não sendo executado: vazio
Tópico: System
Espero ter ajudado.
Abraço.
--------------------------------------------------------------------------------
Atenciosamente:
Eduardo Cláudio Nicácio
Analista Programador
Fábrica 02 - CTIS
Tel.: (11) 3150-6834
[EMAIL PROTECTED]
----- Original Message -----
From: Edu Nicácio
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, April 11, 2007 10:01 AM
Subject: Re: [delphi-br] Impressão de Imagem.
Você poderá usar a mesma rotina ShellExecute que já foi discutida diversas
vezes aqui. Só atente-se para o fato de a extensão JPG possuir uma entrada em
print "Tipos de arquivos" em "Opções de Pastas" do Windows.
ShellExecute(0,'print','C:\imagens\imagem.jpg',nil,nil,SW_SHOWNORMAL);
Se quiser que não apareça o diálogo de impressão pode passar como último
parâmetro SW_HIDE.
Espero ter ajudado.
Abraço.
----------------------------------------------------------
Atenciosamente:
Eduardo Cláudio Nicácio
Analista Programador
Fábrica 02 - CTIS
Tel.: (11) 3150-6834
[EMAIL PROTECTED]
----- Original Message -----
From: Régis Bender
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 10, 2007 8:39 AM
Subject: [delphi-br] Impressão de Imagem.
Bom dia Pessoal.
Tenho uma imagem em um determinado caminho (c:\imagens\imagem.jpg) e gostaria
de imprimir esta imagem direto pelo delphi sem visualizar.
Alguém pode me ajudar?
sds
Bender Desenvolvimento de Sistemas
e Serviços Contábeis (Régis)
(51) 98470699
Novo Hamburgo/RS
MSN: [EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
