Sim, não funciona mesmo! Não funciona pq os sistemas Windows baseados na plataforma NT (NT/2000 e XP) possui rígidas restrições para acessar recursos de baixo nível do computador, como portas de I/O (como no código Assembly exposto) e endereçamentos de memória.
Pra verificar uma porta de I/O de impressora, teria que ser escrito um driver VxD (ou baseado no WDM - Windows Driver Model em plataformas NT) pra acessar a porta e a aplicação Delphi se comunicar com esse driver pra saber o status da impressora. E o Delphi não gera drivers, como o Visual C++ junto com o Drivers Development Kit faz! Isso tudo pra checar o status da impressora local! Boa sorte! -----Mensagem original----- De: japoneyz [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 24 de fevereiro de 2005 10:32 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Status da Impressora. Bom dia a todos. Gostaria de saber se alguem conhece alguma rotina que pegue o Status da Impressora na porta paralela, mas que funcione no Windows NT/2K/XP. Esse codigo //****************************************************** Asm mov ah,Portas; {Requisita o acesso as portas} mov dx,Porta; {Define a porta de teste} Int $17; {Chama a interrupção de Impressora} mov nRes,ah; {Guarda em Res o resultado da operação } end; //****************************************************** não funciona no Windows NT/2K/XP. Agradeço pela ajuda, []s Japoneyz -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.856 / Virus Database: 583 - Release Date: 07/02/2005 -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html