Jump to content
Fivewin Brasil

zekasan

Membros
  • Posts

    146
  • Joined

  • Last visited

  • Days Won

    6

Everything posted by zekasan

  1. Meu vizinho pelo jeito terá que colocar um software homologado, alguem teria um sistema pronto para um mercado pequeno (apenas 1 caixa)? FWH 8.05 - xHarbour - xDev - VLib
  2. na hora de gravar os dados da tela, eu dou um seek no bd do dbcombo com o valor dele, caso ele não exista eu adiciono ele e recarrego o dbcombo novamente, é bem rudimentar mas funciona FWH 8.05 - xHarbour - xDev - VLib
  3. tente linkar a ct.lib do xharbour FWH 8.05 - xHarbour - xDev - VLib
  4. Olá Talita, que linguagem você trabalha? FWH 8.05 - xHarbour - xDev - VLib
  5. vc tentou colocar o botão como owner draw no pelles? FWH 8.05 - xHarbour - xDev - VLib
  6. vc já olhou que papel está configurado na impressora? isto costuma acontecer qdo os papéis nao estão configurados iguais FWH 8.05 - xHarbour - xDev - VLib
  7. Vc já tentou executar o MED como "administrador"? FWH 8.05 - xHarbour - xDev - VLib
  8. No router em "DHCP SETTINGS" Ãtem " ADDRES LEASE TIME" Mude o valor padrão que é de 120 min para um valor maior, este valor define quanto tempo um endereço dinâmico poderá ficar liberado. Por isso ele desconecta a cada 2 horas (120 min) Informações retiradas do manual do Router da PACIFIC, creio que seja o mesmo para as outras marcas FWH 8.05 - xHarbour - xDev - VLib
  9. Usando o Pelles vc tem que gerar no formato "res" FWH 8.05 - xHarbour - xDev - VLib
  10. você pode usar também a funçao do (x)harbour: BOM ([]) -> dDateBeginOfMonth retorna o primeiro dia do mes ? BOM(date()) 01/10/2008 obs.: anexe a biblioteca CT.LIB do (x)harbour FWH 8.05 - xHarbour - xDev - VLib
  11. procure no google por "miniguibrasil" FWH 8.05 - xHarbour - xDev - VLib
  12. zekasan

    HWGUI

    http://br.groups.yahoo.com/group/xhgtk-br/ é gratuito, basta vc fazer sua inscrição no grupo FWH 8.05 - xHarbour - xDev - VLib
  13. Posso estar falando besteira, mas creio que o rc gerado pelo workshop não é aberto corretamente pelo Pelles FWH 8.05 - xHarbour - xDev - VLib
  14. Boa tarde a todos, é possível mudar a cor da msgbar? está setada como 2007. FWH 8.05 - xHarbour - xDev - VLib
  15. Boa tarde a todos, é possível mudar a cor da msgbar? está setada como 2007. FWH 8.05 - xHarbour - xDev - VLib
  16. +-------+ fio ------------[resistor]-----------| MODEM | tel. ---------------------------------| | +-------+ FWH 8.05 - xHarbour - xDev - VLib
  17. Vailton no sccript do fivewin linha 236 faltou: t:=len(aFiles) e a pcrepos.lib não vai ser incorporada neste script tb? FWH 8.05 - xHarbour - xDev - VLib
  18. vc precisa incorporar a pcrepos.lib como se fosse incluir um prg FWH 8.05 - xHarbour - xDev - VLib
  19. você não tem que dar um tempo antes do skip prá vc pode ver o registro que está sendo selecionado? FWH 8.05 - xHarbour - xDev - VLib
  20. o Dr. Vaílton poderia nos ajudar?????? FWH 8.05 - xHarbour - xDev - VLib
  21. eu uso como .res e não .rc, mude o nome dela em propriedades, "TESTE" por exemplo, coloque as aspas e letras maiúsculas FWH 8.05 - xHarbour - xDev - VLib
  22. Redefine VGet oCPFR Var cCPFR picture "999999999999999999" Id 6001 Color cCorGet valid vCPF_CNPJ(@cCPFR,@oCPFR) id=code>id=code> function vCPF_CNPJ(NR_CALC,oGet) NR_CALC = StrTran(NR_CALC,".","") NR_CALC = StrTran(NR_CALC,"/","") NR_CALC = StrTran(NR_CALC,"-","") NR_CALC:=alltrim(NR_CALC) if len(NR_CALC) = 11 if zCPF(NR_CALC) //valida o CPF NR_CALC:=substr(NR_CALC,1,3)+"."+substr(NR_CALC,4,3)+"."+substr(NR_CALC,7,3)+"-"+substr(NR_CALC,10,2) oGet:Refresh() return(.t.) else msgalert("CPF informado não é válido","ATENÇÃO") NR_CALC:=space(18) oGet:Refresh() xsetfocus(oGet) endif elseif len(NR_CALC) = 14 if zCNPJ(NR_CALC) //valida o CNPJ NR_CALC:=substr(NR_CALC,1,2)+"."+substr(NR_CALC,3,3)+"."+substr(NR_CALC,6,3)+"/"+substr(NR_CALC,9,4)+"-"+substr(NR_CALC,13,2) oGet:Refresh() return(.t.) else msgalert("CNPJ informado não é válido","ATENÇÃO") NR_CALC:=space(18) oGet:Refresh() xsetfocus(oGet) endif else msgalert("Formato inválido de CPF/CNPJ","ATENÇÃO") NR_CALC:=space(18) oGet:Refresh() xsetfocus(oGet) endif return(.f.) id=code>id=code>FWH 8.05 - xHarbour - xDev - VLib
  23. Você já tentou o chr(13) ao invés do chr(9)? FWH 8.05 - xHarbour - xDev - VLib
  24. por quê vc não lê como se fosse um única variável e depois a desmembra? atribuindo para cada campo um pedaço da primeira variável? a:="123412345678901" a1:=substr(a,1,4) a2:=substr(a,5,11)... FWH 8.05 - xHarbour - xDev - VLib
  25. redefine listbox ... ON DBLCLICK msginfo("CLIQUE DUPLO") FWH 8.05 - xHarbour - xDev - VLib
×
×
  • Create New...