daniel_halon

Olá Kapi, poderias me dizer como e o procedimento para colocar em dicas? daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Obrigado gente, vou dar uma olhada nisso. Valeu! daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Postei em dicas para quem estiver interesado daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Editado por - daniel_halon on 01/10/2012 19:26:09

Postei em dicas para quem estiver interesado daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Editado por - daniel_halon on 01/10/2012 19:26:09

Olá amigos, tem como saber se uma unidade e USB (Pen drive), algo como MsgInfo( IsCdRom( "C:" ) ) Preciso fazer copia de segurança e meu cliente e muito burro com o computador. @ 1, 1 LISTBOX cDrive ITEMS aDrives(2) SIZE 100, 100 OF oDlg ; ON DBLCLICK (msginfo(cDrive), oDlg:End()) id=code>id=code>Obrigado pessoal daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Olá amigos, tem como saber se uma unidade e USB (Pen drive), algo como MsgInfo( IsCdRom( "C:" ) ) Preciso fazer copia de segurança e meu cliente e muito burro com o computador. @ 1, 1 LISTBOX cDrive ITEMS aDrives(2) SIZE 100, 100 OF oDlg ; ON DBLCLICK (msginfo(cDrive), oDlg:End()) id=code>id=code>Obrigado pessoal daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Obrigado Antenor, resolveu meus problemas, agora preciso saber como colocar o texto no total com outra cor, vi os exemplos de test mas onde diz que altera a cor, na verdade altera a fonte, saberias me informar no report como posso trocar uma cor em uma celda, em uma coluna e no total?. obrigado, Daniel daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Na verdade quero colocar como logo, no inicio, sabes como fazer? daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Valeu, tem importância em que linha e colocado o saybitmap? daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta.

Olá galera, alguem pode me ajudar não sei como inserir uma imagem em um reporte. já tentei de varias formas #define BLANCO 1 #define ROJO 2 #define AMARILLO 3 #define AZUL 4 #define VERDE 5 BDATA:=CTOD('14/08/2012') SELECT NEWPED NEWPED->(dbGoTop()) REPORT oReport ; TITLE "*** RELACAO DE PEDIDOS ***","","Referente ao dia "+ Dtoc(bData),"" ; HEADER "Data: "+dtoc(date())+space(75)+"Hora: "+time() ; FOOTER "P gina: "+str(oReport:nPage,3); PREVIEW oReport:SayBitmap( 1.1, 1.1, "IMAGE\everaldo.bmp") // Logo *GROUP ON newped->total ; * HEADER " " ; * FOOTER "Total vendas "+oReport:aGroups[1]:cValue COLUMN TITLE "codigo" ; DATA newped->cod_cli COLUMN TITLE "pedido" ; DATA newped->nro_pedido ; SIZE 6 COLUMN TITLE "data" ; DATA DTOC(newped->data); CENTER COLUMN TITLE "Empresa"; DATA newped->NOME COLUMN TITLE "total" ; DATA newped->total ; PICTURE "9,999,999" ; SIZE 9 ; TOTAL END REPORT // Color para lineas en verde *oReport:bStdFont := {|| VERDE } //Color para totales de cuarta columna en AZUL *oReport:aColumns[4]:bTotalFont := {|| AZUL } //Header y Footer en azul // oReport:oHeader:aFont[1] := {|| AZUL } // oReport:oFooter:aFont[1] := {|| AZUL } // Titulo, header y Footer de grupo en amarillo // oReport:oTitle:aFont[1] := {|| AMARILLO } // oReport:aGroups[1]:bHeadFont :={|| AMARILLO } // oReport:aGroups[1]:bFootFont :={|| AMARILLO } ACTIVATE REPORT oReport ; FOR NEWPED->DATA == BDATA RETURN NIL /code] daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Editado por - daniel_halon on 25/08/2012 19:49:32 Editado por - daniel_halon on 28/08/2012 09:42:16

Olá galera, alguem pode me ajudar não sei como inserir uma imagem em um reporte. já tentei de varias formas #define BLANCO 1 #define ROJO 2 #define AMARILLO 3 #define AZUL 4 #define VERDE 5 BDATA:=CTOD('14/08/2012') SELECT NEWPED NEWPED->(dbGoTop()) REPORT oReport ; TITLE "*** RELACAO DE PEDIDOS ***","","Referente ao dia "+ Dtoc(bData),"" ; HEADER "Data: "+dtoc(date())+space(75)+"Hora: "+time() ; FOOTER "P gina: "+str(oReport:nPage,3); PREVIEW oReport:SayBitmap( 1.1, 1.1, "IMAGE\everaldo.bmp") // Logo *GROUP ON newped->total ; * HEADER " " ; * FOOTER "Total vendas "+oReport:aGroups[1]:cValue COLUMN TITLE "codigo" ; DATA newped->cod_cli COLUMN TITLE "pedido" ; DATA newped->nro_pedido ; SIZE 6 COLUMN TITLE "data" ; DATA DTOC(newped->data); CENTER COLUMN TITLE "Empresa"; DATA newped->NOME COLUMN TITLE "total" ; DATA newped->total ; PICTURE "9,999,999" ; SIZE 9 ; TOTAL END REPORT // Color para lineas en verde *oReport:bStdFont := {|| VERDE } //Color para totales de cuarta columna en AZUL *oReport:aColumns[4]:bTotalFont := {|| AZUL } //Header y Footer en azul // oReport:oHeader:aFont[1] := {|| AZUL } // oReport:oFooter:aFont[1] := {|| AZUL } // Titulo, header y Footer de grupo en amarillo // oReport:oTitle:aFont[1] := {|| AMARILLO } // oReport:aGroups[1]:bHeadFont :={|| AMARILLO } // oReport:aGroups[1]:bFootFont :={|| AMARILLO } ACTIVATE REPORT oReport ; FOR NEWPED->DATA == BDATA RETURN NIL /code] daniel_halon@portobakers.com.br - Porto Alegre - RS daniel_halon@portobakers.com.br FWH 6.12 xHarbour + Vlib + Pelles C. A vida esta feita de pequenos momentos de felicidade, o resto e muita luta. Editado por - daniel_halon on 25/08/2012 19:49:32 Editado por - daniel_halon on 28/08/2012 09:42:16

Boa noite a todos, tentei pegar algum exemplo de dicas, mas como não esta funcionando, peço se podem me ajudar um pouco. Preciso procurar na base de dados aqueles clientes que tem e-mail registrado e enviar uma promoção com um anexo, alguem pode me orientar?, obrigado. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Boa noite a todos, tentei pegar algum exemplo de dicas, mas como não esta funcionando, peço se podem me ajudar um pouco. Preciso procurar na base de dados aqueles clientes que tem e-mail registrado e enviar uma promoção com um anexo, alguem pode me orientar?, obrigado. daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Ok, obrigado a todos, fico no aguardo daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Boa tarde pessoal, não sei se e o lugar apropiado, mas algem sabe me dizer porque não consigo baixar nehuma dica? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Boa tarde pessoal, não sei se e o lugar apropiado, mas algem sabe me dizer porque não consigo baixar nehuma dica? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Obrigado Aferra, funciono OK daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.12 xHarbour + 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.

Obrigado Alessandro, vou tentar incluir daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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.

Obrigado gente pelo interese, a questão e assim: o usuario pode selecionar uma opção entre 8.000 e 12.000 so que o acréscimo ou decréscimo deve ser de 1.000 em 1.000 procureir exemplos e não achei, pensei que teria uma opção de STEP n para pular. Tanto e verdade isso que acresxce de 1 em 1, que se a variável for 1.5, o acrescimo vai para 2.5. No meu caso, se for pular de 8.000 para 10.000 de um em um, nem pensar. Não havendo posibilidade, terei que fazer com um combo, o que vcs acham? daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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á galera, preciso de ajuda, tenho um get com spinner e preciso que suba ou deça de 1000 em 1000, e em outro de 0,5 em 0,5, como faço???, vai o exemplo: *GAUSS := 10000 REDEFINE VGET oGAUSS VAR GAUSS ID 4010 OF oDlg1 FONT o_Verdana3 Picture '99999' vista SPINNER min 8000 max 12000 id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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 09/03/2010 20:37:01

Olá galera, preciso de ajuda, tenho um get com spinner e preciso que suba ou deça de 1000 em 1000, e em outro de 0,5 em 0,5, como faço???, vai o exemplo: *GAUSS := 10000 REDEFINE VGET oGAUSS VAR GAUSS ID 4010 OF oDlg1 FONT o_Verdana3 Picture '99999' vista SPINNER min 8000 max 12000 id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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 09/03/2010 20:37:01

Olá gente, estou com um proble com a Vget, quando coloco o picture da erro TRANSFORM, vai exemplo para ver o que estou fazendo errado *VS1 REDEFINE VGET oVS1 VAR VS1 ID 4002 OF oDlg1 FONT o_Verdana3 Picture '@E999999.99' vista id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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á gente, estou com um proble com a Vget, quando coloco o picture da erro TRANSFORM, vai exemplo para ver o que estou fazendo errado *VS1 REDEFINE VGET oVS1 VAR VS1 ID 4002 OF oDlg1 FONT o_Verdana3 Picture '@E999999.99' vista id=code>id=code>daniel_halon@portobakers.com.br - Porto Alegre - RS FWH 6.2 xHarbour + 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.

Programador e que nem sogra, ninguem tira do meio, parabens pela volta e que tua recuperação seja rápida 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.

Putz, to me sentindo velho pra caramba, eu tambem comecei com uma SINCLAIR , 1K de memoria, mas comprei um expansor de memória, ai a coisa mudou, tinha 16K!!! Meu primeiro XT tinha HD de 10 Mb, era um luxo. Hoje com 56 tenho muita coisa pra contar para meus filhos... 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.