PC Toledo

jamazevedo

Olá Hasa.

As telas (monitores) de toque possuem um campo USB (as vezes serial) que é ligado na CPU, "funciona como um mouse", por isso não há algo especial na programação.

jamazevedo

Sou usuário Linux, distribuição Ubuntu 10.04 e 12.04, com Apache, PHP e MySQL.
Funciona perfeitamente.

jamazevedo

Tenho uma rotina semelhante, INKEY(2), DBCOMMIT() antes do DBUNLOCK(), não tenho problemas de duplicação.

jamazevedo

Olá Jamil.

Não é o meu caso! A necessidade de abortar surge quando já não existe um "ESTADO DE ESPERA" e estamos em pleno processamento dos arquivos de dados.
Tente utilizar a função NEXTKEY() em vez de INKEY() .

Não tenho intimidade com HMG, sou usuário Linux, em ambientes gráficos tem a ...

jamazevedo

Olá senhores!

Pra mim a maneira mais eficiente de "Abortar / Encerrar" um programa em execução é através das teclas ALT C . A recomendação é que deixe isso como default pois é nativa em Clipper / Harbour , caso você esteja utilizando alguma lib de terceiros as teclas de F1 a F12 podem ser ...

jamazevedo

Não está funcionando porque o Google tirou o serviço do ar.

jamazevedo

Eu faço assim:

Código: Selecionar todos

cCodigo := SPACE(13)
@ 1,1 SAY "Digite o Codigo:" GET cCodigo PICTURE "@!"
READ

Funciona 100%.

jamazevedo

De forma bem primária:
tenho impressora lx-300 (usb);
capturo a porta via: net use lpt1: \\maquina\nome_print (no sistema operacional, não é no harbour)
rotina de impressão:
set device to print
do while lAte_o_Fim
if nContaLinha == 0 .OR. nContaLinha == 60
Cabecalho()
endif
@ prow()+1,001 ...

jamazevedo

nfsaida.txt: (768.69 KiB) Baixado 144 vezes

Conforme sua solicitação segue um arquivo de ECF, sinceramente acredito que não ajudará, mas ...

jamazevedo

Tem sim, incluse todo o seu sistema.

Vá a opção:

Diversos
Importação de dados
Arquivo no formato Folhamatic layout
Escolha a versão (aqui uso a 2.0)
Layou de importação (aqui ele abre um PDF com todos os detalhes)

Não dá pra postar exemplos aqui, mas leia o manual que você conseguirá.

jamazevedo

Eu faço assim:

Código: Selecionar todos

cQuery1 := "INSERT INTO minhatabela (cmp1,cmp2) VALUES (vlr1,vlr2);"
oQuery   := oServer:Query(cQuery1)
cQuery2 := "DELETE FROM minhatabela WHERE id=1;"
oQuery   := oServer:Query(cQuery2)

jamazevedo

Eu faço assim:

Código: Selecionar todos

set device to print
set printer to "saida.prn"
@ prow+1 , 000 say "imprime"
@ prow+1 , 000 say "varios comandos de impressao"
eject
set printer to
set device to screen

Após isso um arquivo saida.prn será criado na pasta da aplicação.

jamazevedo

Para imprimir em TLP utilizou outra técnica:
Crio um .txt com as seguites linhas:
Q104,24
q831
rN
S4
D7
ZT
JB
OD
R56,0
N
B50,0,0,2,2,10,50,B,"1234567890"
B420,0,0,2,2,10,30,B,"1234567890"
P1

Depois envio o arquivo para impressora:
type arquivo.txt >prn
O salto de página (etiqueta) é automático ...

jamazevedo

Essa classe encontra-se no fonte: /usr/src/harbour/examples/guestbk/testcgi.prg

jamazevedo

#fonte: testecgi.prg
FUNCTION Main()
LOCAL oHTML := THTML():New()
LOCAL oCgi
oHTML:ProcessCGI()
oCgi := TipCgi():New()
oCgi:Print( 'Ola mundo!' )
oCgi:Flush()
RETURN ( NIL )

#compilando
hbmk2 testecgi.prg ../Cgi/testcgi.prg -gtcgi -lhbtip

#copiando
cp -p testecgi /usr/lib/cgi-bin ...

PC Toledo

Pesquisa resultou em 122 ocorrências

xHarbour x Windows 8

Exemplos com SQLite

Gravação duplicando

Tecla de Abortamento

Tecla de Abortamento

Previsao do tempo

Leitor de código de barras

impressora FX-890

Folhamatic

Folhamatic

Mysql.lib - não aceita query multiplas?

Capturar LPT1 para Arquivo

Impressora Zebra TLP 2844

Passa a Passo para CGI em Linux

Passa a Passo para CGI em Linux