Galera to usando a função abaixo para testar se a impressora esta on line
antes de enviar o relatório para impressão.
Mas esta dando erro de Acess Violation na linha Int $17;
Alguém teria uma outra função que funcione ?
Function PrinterOnLine : Boolean;
Const
PrnStInt : Byte = $17;
StRq : Byte
Alessandro Cunha Fernandes ><>
SoftTI - Software e Consultoria em TI
_
De: Eduardo Jedliczka [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 1 de novembro de 2004 08:26
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Testar se impressora esta on line no windows XP
Bo
-Mensagem original-
> De: Eduardo Jedliczka [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 1 de novembro de 2004 07:26
> Para: [EMAIL PROTECTED]
> Assunto: Re: [delphi-br] Testar se impressora esta on line no
> windows XP
>
>
>
> Bom, ne
TECTED]
> Enviada em: segunda-feira, 1 de novembro de 2004 07:26
> Para: [EMAIL PROTECTED]
> Assunto: Re: [delphi-br] Testar se impressora esta on line no
> windows XP
>
>
>
> Bom, neste caso o seu sistema não vai funcionar...
>
> Deixe-me repetir a pergunta, mas
do
"feriado"...
[s]
=
Eduardo Jedliczka
GeraSoft Informática
Apucarana - PR
=
- Original Message -
From: Alessandro Fernandes ><>
To: [EMAIL PROTECTED]
Sent: Saturday, October 30, 2004 6:30 PM
Subject: RES: [delphi-br] Testar se impressora
oftware e Consultoria em TI
_
De: Eduardo Jedliczka [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 28 de outubro de 2004 18:05
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Testar se impressora esta on line no windows XP
Desculpe a pergunta, mas testar a impressora para Quê ???
Concordo, Eduardo. Mas não sabemos a real necessidade do Alessandro.
[]s
-Mensagem original-
De: Eduardo Jedliczka [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 28 de outubro de 2004 16:05
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Testar se impressora esta on line no
=
- Original Message -
From: Rubem Rocha
To: [EMAIL PROTECTED]
Sent: Thursday, October 28, 2004 4:41 PM
Subject: RES: [delphi-br] Testar se impressora esta on line no windows XP
Não funciona pq todos os ambientes operacionais baseados em plataforma NT
(NT/2000/XP) são muito
13:38
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Testar se impressora esta on line no windows XP
Colegas
Gostaria de saber como testar se uma impressora ligada à porta LPT1 esta on line. A
rotina abaixo não funciona no windows XP. Da um erro de violação de acesso.
While not Printer
Colegas
Gostaria de saber como testar se uma impressora ligada à porta LPT1 esta on
line. A rotina abaixo não funciona no windows XP. Da um erro de violação de
acesso.
While not PrinterOnline() do
begin
MsgBox('Verifique a Impressora!','ATENÇÃO');
end;
Function PrinterOnL
10 matches
Mail list logo