daniel_halon

Olá gente, passei por esse problema, eu monto tudo no Pelles e resolvi assim: Montei um GRUPOBOX para controlar com a Vbox e todos os TEX e EDITBOX depois, IMPORTANTE no GrupoBox colocar o TAB Index sempre menor que os TEXT e EditBox, exemplo: se o GrupoBox tem o TabIndex 100, para o texto e get devem ser superior a 100, isto resolve o problema de não aparecer os gets na tela ate passar por eles, e muito importante a ordem de montagem, 1º o grupobox e depois os textos e gets.Pelo menos assim eu resolvi. Quem não usar o Pelles, sinto muito, não sei se o WS respeita a mesma ordem. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Vagner, peço desculpas, não tive a menor intenção de prejudicar vc., para tua tranquilidade, não foi enviada para ninguem, não distribui a vontade como dizes, dei uma olhada e vi assim: Lailton FiveWin / Xharbour / BCC55 / Designer.lib / SQLLIB / Vlib / Pelles C, assumi que ele teria comprado a Vlib, e sem pensar oferecí enviar, sei que foi errado peço desculpas. Aproveitando este meu erro, enviei um e-mail pra vc o dia 24/09/08, referente a um problema com a Vbox, não me respondiste, poderias dar uma olhada nele? Obrigado, Daniel daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Luiz, não sei te dizer, mas o Vagner me mandou alem do demo a Vlib compilada com um monte de versões do FW, eu não tenho o FW 8.08 mas tenho todas a libs da Vlib. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Opa!, o e-mail voltou, esta certo? informaisvrb@gmail.com daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Marcio, da uma olhada em teu e-mail, enviei a versão 8.08 compilada abraços, daniel daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Luiz, tudo bom?, vai ahi o meu código TextLoja := 'Nono Pietro' TextData := tele0050->a_Dt_mov50 Esta e a Vbox do Vagner! Redefine VBox ID 10003 OF oAbt Color nRGB00,000,000), {nRgb(200,200,200),nRgb(120,120,120)} //Informações *Textos sobre a Vbox REDEFINE SAY oTextLoja VAR TextLoja ID 505 OF oAbt font o_Verdana2 COLOR CLR_BRANCO Transparent REDEFINE SAY oTextData VAR TextData ID 503 OF oAbt font o_Verdana2 COLOR CLR_BRANCO Transparent Este Ssay com redefine congela, não consigo usar... //REDEFINE SsAY oTextData VAR TextData ID 503 OF oAbt font o_Verdana2 COLOR CLR_BRANCO Transparent *Gets *Fone REDEFINE VGET oDatos[1,1] Var a_Dados[1,1] ID 1001 OF oAbt picture '9999-9999'; FONT O_TEXTO_SS3 VALID Check_cliente(lComple, P_COMPLE, a_dados, oABT, lSalir); Color nRgb(255,255,255),{nRgb(0,0,255),nRgb(088,117,255),nRgb(000,000,255),nRgb(000,255,255)} Round *Ramal REDEFINE VGET oDatos[1,2] VAR A_DADOS[1,02] ID 1005 OF oABT Picture '9999'; FONT o_TEXTO_SS3; // COLOR CLR_PRETO, CLR_GETS UPDATE //Ramal Color nRgb(255,255,255),{nRgb(0,0,255),nRgb(0,0,128),nRgb(000,000,255),nRgb(000,255,255)} Round *Celular REDEFINE VGET oDatos[1,11] Var a_Dados[1,11] ID 1024 OF oAbt picture '9999-9999'; FONT O_TEXTO_SS3; Color nRgb(255,255,255),{nRgb(0,0,255),nRgb(0,0,128),nRgb(000,000,255),nRgb(000,255,255)} Round id=code>id=code>Existe no FW um comando Box? para criar uma caixa com cor específica? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá pessoal, Estou usando a Vlib do Vagner, e estou tratando de colocar um texto na Vbox e não estou conseguindo(ele não fica transparente), o Redefine Say normal com transparent, não funciona. to louco tentando usar o Ssay com Redefine em uma Vbox, e o sistema congela, o problema esta com o Redefine Ssay, com @ 1,1 Ssay funciona ok. Estou usando o Ssay.ch que vem junto com o demo da Vlib. Alguem pode dar uma ajudinha!!! Obrigado, Daniel daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá pessoal, Estou usando a Vlib do Vagner, e estou tratando de colocar um texto na Vbox e não estou conseguindo(ele não fica transparente), o Redefine Say normal com transparent, não funciona. to louco tentando usar o Ssay com Redefine em uma Vbox, e o sistema congela, o problema esta com o Redefine Ssay, com @ 1,1 Ssay funciona ok. Estou usando o Ssay.ch que vem junto com o demo da Vlib. Alguem pode dar uma ajudinha!!! Obrigado, Daniel daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Hola Vagner, conseguiste solucionar os problemas do Vsay com Redefine, poscicionamento a ezquerda e direita, e Round e Vista?, por enquanto estou usando Vget, mas seria logico usar Vsay com Redefine. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Hola Vagner, conseguiste solucionar os problemas do Vsay com Redefine, poscicionamento a ezquerda e direita, e Round e Vista?, por enquanto estou usando Vget, mas seria logico usar Vsay com Redefine. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 1.1.0 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Já fiz tudo o indicado, até compilei um exemplo na pasta samples, e com o hbmake sempre fica a janela do DOS. Ainda sem resolver!! daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Naruto, uso o hbmake, já tentei adicionar a gtgui, a gtwin não aparece para ser selecionada no hbmake, e mesmo por default, não tenho ideia do que pode ser, mas e xarope demais, vou dar uma olhada no forun internacional, quem sabe como falou o Kapi, consigo ver alguma coisa, se sabes de algo mais fico no aguardo, obrigado daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Hola Kapi, como estas? (ejercitando el español) Es así, cuando clico arriba del icone del programa, antes de abrir el programa, aparece una ventana del DOS con el nombre del ejecutable en el caption (NEW), y queda hasta que cierro el programa, el problema es que cuando abro la ventana de inclusion de pedidos, si por acaso la minimizo, aparece abajo la ventana del DOS, que sera?. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Naruto, acho que não e meu problema, pois não estou fazendo nehuma chamada, simplesmente clico sobre o executavel (New.exe), mas vou tentar adicionar a lib ao compilar Obrigado!! daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá pessoal, alguem poderia me dizer porque aparece esta janela quando minimizo? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro. Editado por - daniel_halon on 03/09/2008 15:04:39 Editado por - daniel_halon on 04/09/2008 11:55:20

Olá pessoal, alguem poderia me dizer porque aparece esta janela quando minimizo? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro. Editado por - daniel_halon on 03/09/2008 15:04:39 Editado por - daniel_halon on 04/09/2008 11:55:20

Olá pessoal, tenho algumas duvidas com a Vlib, como posso fazer para que meus Redefine Say fiquem arredondados como os Vget? e mais uma, e possível a Vbutton com prompt? DEFINE VBUTTON oBt2 OF oBar RESOURCE "2_juntos" PROMPT "Pedidos" TOP; ACTION Ped_inc(.f.); TOOLTIP "Pedidos" NOBORDER id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá pessoal, tenho algumas duvidas com a Vlib, como posso fazer para que meus Redefine Say fiquem arredondados como os Vget? e mais uma, e possível a Vbutton com prompt? DEFINE VBUTTON oBt2 OF oBar RESOURCE "2_juntos" PROMPT "Pedidos" TOP; ACTION Ped_inc(.f.); TOOLTIP "Pedidos" NOBORDER id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Da para colocar um exemplo para os mais novatos? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Rubem, E precisamente esse exemplo que estou tratando de compilar daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Eu tenho uma impressora bematech não fiscal de 40 colunas, ela esta com algum problema psicológico, porque tem vezes que não respeita o eject, então resolvi assim: Em uma dbf de configurações tenho um campo "Salto" com valor 9. @prow()+Tele0050->Salto,0 say '' isto faz com que pule neste caso 9 linhas Espero ter ajudado daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Kapi, Não deu certo, testei outras e nada, to louco pra fazer isto funcionar. Hola Quicussi, Eu que ja estou doido, mas quando sair isto aqui, vou ligar até o liquidificador pelo programa daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Estou tentado compilar e me da o seguinte erro: xLINK: error: Unresolved external symbol '_HB_FUN_OUTPORTBYTE'. xLINK: error: Unresolved external symbol '_HB_FUN_INPORTBYTE'. xLINK: fatal error: 2 unresolved external(s). daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.

Olá Luiz, Eu uso a impressão do mesmo jeito que vc e não tenho problemas, uso o xHarbour olha so: set printer to (iif(p_tela,'rvend.txt',tele0050->a_disp2_50))// aqui seleciono LPT1 ou LPT2, conforme a dbf set device to printer // // configuracao impressora // if !p_tela @prow(),pcol() say '@' endif // // impressao do cabecalho // a_cabecalho := cabecalho('RESUMO DE INFORMACOES','Intervalo de '+dtoc(a_filtro[1])+' ate '+dtoc(a_filtro[2])+' Turno: '+a_filtro[3], 80, 1) @prow()+1,0 say empresa()[2] @prow()+1,0 say a_cabecalho[1] @prow()+1,0 say a_cabecalho[2] @prow()+1,0 say replicate('-',80) @prow() + 1, 000 say 'INFORMACAO GERAL DOS PEDIDOS' @prow() + 1, 000 say replicate( '-', 80 ) @prow() + 1, 000 say 'Quantidade de Pedidos.....: ' + transform( a_totais[01], '@E 999,999' ) @prow() + 1, 000 say 'Pedidos Cancelados........: ' + transform( a_totais[03], '@E 999,999' ) @prow() + 1, 000 say 'Maior Demora..............: ' + transform( a_totais[05], '@E 999,999' ) @prow() + 1, 000 say 'Media de Demoras..........: ' + transform( a_totais[04] / a_totais[1], '@E 999,999' ) @prow() + 1, 000 say replicate( '-', 80 ) @prow() + 1, 000 say 'INFORMACAO GERAL DO FATURAMENTO' @prow() + 1, 000 say replicate( '-', 80 ) if dtoc(a_filtro[1])== dtoc(tele0050->a_dtmov_50) .and. dtoc(a_filtro[2])==dtoc(tele0050->a_dtmov_50) .and. a_filtro[3]==tele0050->a_turno_50 @prow() + 2, 000 say 'Caixa Inicial.............: ' + transform( v_fundo100,'@E 9,999,999,999.99') + ' ( + )' @prow()+1,0 say replicate('-',80) eject // // llamo para saber quantas pizzas vendio // q_pizzas(p_tela,a_filtro) // eject set device to screen set printer to if p_tela edit_file('rvend.txt') endif id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro. Editado por - daniel_halon on 21/05/2008 12:19:23

Obrigado Vagner, agora comprendi, na tua função cabe entender que ficaria assim: NomeDaSuaFuncao(1,0) --> Testa o byte 1 Pino 8 porta NomeDaSuaFuncao(2,0) --> Testa o byte 2 Pino 7 porta NomeDaSuaFuncao(16,0) --> Testa o byte 16 Pino 4 porta NomeDaSuaFuncao(32,0) --> Testa o byte 32 Pino 3 porta NomeDaSuaFuncao(64,0) --> Testa o byte 64 Pino 2 porta NomeDaSuaFuncao(128,0) --> Testa o byte 128 Pino 1 porta Estaria correto assim? mais uma duvida, quando compilar muda alguma coisa pela função em C incorporada? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 2.7 xHarbour 0.99.71 Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Cuanto mas conozco a la gente, mas quiero a mi perro.