Jump to content
Fivewin Brasil

gibaf

Membros
  • Posts

    1,678
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by gibaf

  1. gibaf

    Arquivo.HRB

    ola a todos... demorei um tempinho para acessar o fivewin eu uso ja a tempo, e tudo funcionando, perfeitamente.. se nao quizer colocar as funcoes genericas dentro do exe, pode fazer a chamada das funcoes por macro. pode criar varios prgs num .hrb, sim, eu gero o .hrb com o xhb.exe... esse permite vc usar um arquivo.txt, listado todos os fontes, pra gerar um unico .hrb. para ler um rhb, eu faco assim: __HrbLoad( fileHRB ) dae, eh so executar as funcoes... ao abrir o hrb o exe "testa" a funcao, e se a funcao estiver num outro hrb q ainda nao foi aberto, var dar error.log.. pra resolver isso, faz como disse acima, ou seja, executar por macro: &("RodaFuncao()") para fechar o hrb, eu faco assim: __HrbUnLoad( fileHRB ) qquer coisa, estou a disposicao Abracos.
  2. e, nao tem como imprimir o GNRE, sem o xml ???
  3. ola e tem como gerar a GNRE sem ter o xml (essa eh a minha necessidade) ? obrigado
  4. ola a todos !!! alguem tem (ou sabe se existe) alguma funcao (ou alguma forma) para fazer a app imprimir a GNRE da partilha do icms difal ? desde ja agradeco: MUITO OBRIGADO Gilberto
  5. ola.. .teve a solucao ??? eu tambem estou precisando... obrigado
  6. ola... obrigado por responder... nao entendi, como faco se o botao tem a opcao CANCEL (talvez essa seja a saida para mim)... porque a segunda, penso q nao, pois eu simplifiquei o exemplo... na verdade, eh uma funcao generica q todos os cadastros executa ela, e tem, num lugar do discionario a todas as validacoes, ate seria possivel, mas tentei e nao consegui, se soubesse o get q estavao, quando pressionado o botao, pra fazer o valid no botao obrigado mais uma vez...
  7. ola tenho um DIALOG... nesse dialog tem 2 get's: cpf e nome o cpf tem um valid pra checar se ja existe um cadastro com o mesmo cpf.. o get executa, isso se sair com enter, ou tab, ou seja, pra pular para o nome. agora, eu tenho tambem um botao pra GRAVAR... se eu clicar nesse botao, o valid do cpf nao executa... ate parece q executa, tipo, dah a mensagem q ja existe um cadastro, mas o get sai do codigo, ou seja, deixa gravar alguem tem alguma solucao para isso ? desde ja agradeco a ajuda: MUITO OBRIGADO
  8. representante no Brasil: http://renet.com.br/
  9. ninguem ainda usa o ads server ??
  10. ola alguem sabe do site ? e, se, por ventura, alguem souber valor e quiser comentar... desde ja agradeco: MUITO OBRIGADO
  11. acho q vc nao me entendeu..hehehe eu nao tenho problema em saber a funcionalidade do LMC... o q estou precisando eh outra coisa, leia com atencao q vai entender... de qquer forma, obrigado pela tentativa (soh penso q poderia evitar dicas desnecessarias, q nao eh o q foi perguntado, soh ler mais atentamente, melhor tanto pra vc quanto pra quem pede ajuda)..rs
  12. ola a todos !!! alguem tem o sabe o link ? *LMC = Livro de Movimentação de Combustíveis. obrigado
  13. ola a todos estou precisando converter uma tabela dataflex (.dat) para .dbf tem um odbc flexODBC mas eh pago, e o free mostra apenas 1000 registros da query tem tambem o flexql, mas nao consegui achar para baixar se alguem puder ajudar, fico muito agradecido: muito obrigado Gilberto
  14. ola.. SQLRDD (comercial) faz acesso nos bancos: 1) Nativo: Oracle, MySQL, Firebird 2) ODBC: Microsoft SQL Server, Oracle, DB2, MySQL, Postgress, Firebird, Ingres R3, Sybase System XI, XII and Adaptive Server, ADABAS-D, Caché
  15. ola... como disse a segunda resposta: os comandos/funcoes DtoC, TtoS, Ttoc, SubStr, etc, "estoura" a app... o meu problema eh quando o campo eh Timestamp e nao DataTime (sao sei se tem diferenca... penso q sim - hehehe) aaa... obrigado pela ajuda
  16. ola... nao deu certo... nao sei pq, mas, penso q deva ser pq o q eh recebido no parametro dData nao eh (na minha necessidade) um campo Date, mas sim Timestamp... mas, na tentativa de usar a sua dica, gostaria dizer, o resultado q deu: na linha: aTimeStamp := hb_atokens(tip_timestamp(dData)," ") //retorna -3 e na linha: cTzd := aTail(aTimeStamp) //"estoura" a app e agora ??? hehehe
  17. ola fiz a sua dica... mas o substr "estoura" a app, tipo, dah aquela mensagem do windows q a app parou de funcionar... dei alert no valtype(cDate) e mostrou T (Timestamp)... agora, alert no SUBSTR(cDate,9,2), ou qquer outra funcao,tipo, CStr(), ValToPrg(), TtoC(), TtoS(), tambem "estoura" a app... se alguem mais tiver mais alguma outra dica, fico muito agradecido....
  18. nesse link apareceu os q ainda nao tinham sido listado: MDX e FPX Lembrei agora tambem do ADS alguem sabe de mais algum ?
  19. ola eu conheco o NTX, CDX, SIX, IDX (existe esse ? hehe), NSX, SQLRDD, RDDSQL, mas deve ter mais por ae... alguem saberia relacionar todos os RDD's existentes ? obrigado Gilberto
  20. ola ja tentei mas assim nao faz... descobri: tem q fazer assim: oFld:aDialogs[3]:Hide() ; oFld:SetPrompts( {"Aba1","Aba2"} ) e assim: oFld:aDialogs[3]:Show() ; oFld:SetPrompts( {"Aba1","Aba2","Aba3"} ) obrigado
  21. putz.. deu um branco agora e nao estou encontrando...kkk se alguem puder ajudar, desde ja, fico agradecido: muito obrigado ! att Gilberto
  22. Static Function ChkControl(oDlg) Local x,oCon For x := 1 To Len(oDlg:aControls) oCon := oDlg:aControls[x] If oCon:ClassName() $ "TCOMBOBOX/TMULTIGET/TGET" If oCon:lFocused //Esta Focado Endif Endif Next x Return(Nil)
  23. bom dia vc pode mudar, no seu app, a resolucao do video no windows, para a mais ideal (para a sua app rodar), depois, ao finalizar a app, volta a resolucao do video para como estava *---------------------- Function Main() *---------------------- Local aResolucaoAtual := MudaVideo(1280,768) // todo o seu fonte MudaVideo( aResolucaoAtual[1] , aResolucaoAtual[2] ) Return(Nil) #Pragma BEGINDUMP #include <Windows.h> #include <ShellApi.h> #include <Wingdi.h> #include <hbapi.h> HB_FUNC (MUDAVIDEO) { int iWidthNew = hb_parni(1); int iHeightNew = hb_parni(2); int iWidth,iHeight ; //Pega a Configuracao Atual DEVMODE DeviceMode = { 0 }; EnumDisplaySettings( NULL,ENUM_CURRENT_SETTINGS,&DeviceMode ); iWidth = DeviceMode.dmPelsWidth; iHeight = DeviceMode.dmPelsHeight; //Muda para a nova Configuracao DeviceMode.dmPelsWidth = iWidthNew ; DeviceMode.dmPelsHeight = iHeightNew; ChangeDisplaySettings( &DeviceMode, 0 ); hb_reta( 2 ); hb_storni( iWidth , -1, 1 ); hb_storni( iHeight, -1, 2 ); } #pragma ENDDUMP att Gilberto
×
×
  • Create New...