Pessoal estou quebrando a cabeça aqui e nao consegui resolver por isso estou pedindo a ajuda de voces.Tenho um Sistema de Banco de Sangue desenvolvido em clipper 5.2, existe um aparelho (CAIXINHA) com dois botões ligados na saida da impressora, que retorna um status como de impressora ou seja 0 nao conectado, -1 ligado e 1 ou 3 se pressionar um dos botoes, utilizo a biblioteca funcky e no dos, windows95 e windows98 funciona tudo bem, mas no XP naum retorna valor nenhum ou seja so 0 como se estivesse desconectado ou bloqueada a porta, sei lá. Preciso de algum componente, rotina, funcao , qualquer ajuda que faça isto funcionar, utilizo da seguinte forma:
**************************
#include "Funcky.ch"
local buffer
local status, port
DO WHILE .T.
/*
* Get the porto to check
*/
//port := stdint("port number to check: ",3 )
PORT := 1
/*
* Verify and print status
*/
status := prnstatus(port)
buffer := itoa(status)
stdout("The printer status is: ")
stdoutline(buffer)
if lastkey()=27
break
endif
INKEY(.1)
ENDDO
return nil
**********************
Agradeço desde já pela atenção dispensada
Atenciosamente,
Robson de Goes Pereira
Ourinhos - SP
[/b]
