Jump to content
Fivewin Brasil

aferra

Membros
  • Posts

    3,690
  • Joined

  • Last visited

  • Days Won

    79

Everything posted by aferra

  1. aferra

    Dialog

    Bom dia. Veja em samples gradbrus.prg
  2. isso eu mudei, como não iria mais usar o xharbour passei para HB_ISCHAR, HB_ISARRAY, onde dá erro das funções próprias eu acrescento o hb_ tem um .ch que deixa compatível, mas não encontrei o nome para te passar.
  3. Bindinda. rsrsrsrsrsrs eu já compilo e foi a única coisa que alterei.
  4. Acho que seria só mudar os caminhos desses arquivos. ilink32.cfg e bcc32.cfg, devem estar com o nome da pasta onde estão salvos. exemplo: -Ld:\bcc74\lib;d:\bcc74\lib\psdk se for unidade c -Lc:\bcc74\lib;c:\bcc74\lib\psdk
  5. aferra

    xBrowse

    Bem vindo. Utilize assim oBrw:bChange :=<|| If Valtype(aArray[oBrw:nArrayAt,1]) $ "C|N|" oBrw:aCols[1]:nEditType := EDIT_GET Else oBrw:aCols[1]:nEditType := EDIT_LISTBOX oBrw:aCols[1]:aEditListBound := ; oBrw:aCols[1]:aEditListTxt := aArray[oBrw:nArrayAt,2] // <- assumindo que a 2ª seja um array Endif oBrw:Refresh() >
  6. https://datebest.net - visit link to find love or quick sex, visit link!
  7. https://datebest.net - visit link to find love or quick sex, visit link!
  8. Verifpro.net - paypal, ebay, stripe, banks, crypto, docs and more! Follow channel https://t.me/Verifpro_accounts to get more info
  9. Rapazes... o Sr. Vailton já deu a dica correta. CT.LIB para xharbour e HBCT.LIB para habour. Essa lib vem na xharbour 123 a build eu não sei mas tem um bom tempo + 5 anos. no Harbour vem da 3.0+
  10. aferra

    Pelles C

    de onde vc está copiando? será que não tem algum caractere, tipo ENTER, no meio?
  11. eu pesquiso por aqui, fivewin_class_fwmariarowset [FiveTech Software] quanto ao acento. não sou experte em sql. mas acredito que possa ser o Character set e collation, agora não sei dizer qual utilizar.
  12. Utilizando a classe nativa seria isso oQry:Requery( { <sua query>} ) oBrw:SetMySql(oQry)
  13. Está com cara de ser os caminhos dentro dos arquivo .cfg altere para os nomes de sua pasta. aqui uso em d:\ ilink32.cfg -Ld:\bcc74\lib;d:\bcc74\lib\psdk bcc32.cfg -Id:\bcc74\include\windows\crtl;d:\bcc74\include\windows\sdk;d:\bcc74\include\dinkumware
  14. Benhêêêê. já lhe disse. sou eleitor. sou e-lei-tor. kkkkkkkkkkkkkkkkkkk
  15. Boa tarde... bom vc pode incluir a hbcompat.ch ou usar essa função HB_REGEXLIKE( (<exp2>), (<exp1>) ) IF ( HB_REGEXLIKE( ALLTRIM( LOWER( cEMAILNOCONTA ) ), cRegEx ) )
  16. Abra o pellesc e verifique se no Properties do button o type está Pushbutton e o tabstop yes
  17. é na mesma maquina? qual o windows? se for maquina diferente pode ser segurança do windows.
  18. pelo que estou entendendo é que vc não está salvando, assim que pega o certificado, no arquivo .ini. ou não tem acesso para salvar no arquivo .ini.
  19. Boa tarde. Procure na classe vonfeutil2g.prg, mas, senão me engano, é salvo na pasta c:\windows
  20. aferra

    SMS longo

    Bom, me parece que é o ponto e o traço.
  21. Acho que todas as colunas deveriam ser assim o_produto:<nome_campo> (((o_produto:vlmmaster/o_produto:vlCusto)-1)*100)
  22. Olá, se vc já tem o meter basta colocar assim que vai dar certo bProgress := {|| oMeter:Set( nMeter += 20 ),SysRefresh() } BackUp( , , bProgress )
  23. Veja se assim resolve. oDlg_BUSCA:bPainted := {|| ImagemFundo(oDlg_BUSCA) } ou Active .... ON PAINT ImagemFundo( oDlg_BUSCA ) Static Function ImagemFundo( oDlg ) Local oImg oImg := TImage():Define( "ACG_BUSCARACGINV", , oDlg ) oDlg:SayBitmap( 0, 0, oImg, oDlg:nWidth(), oDlg:nHeight() ) Return(.T.)
  24. Essa funciona para tudo é global SetGetColorFocus( nRGB( 255, 240, 100) )
×
×
  • Create New...