Jump to content
Fivewin Brasil

Eroni

Membros
  • Posts

    561
  • Joined

  • Last visited

  • Days Won

    6

Posts posted by Eroni

  1. Bom dia, acredito que o problema não esteja no código acima, que é o de criação do browse, e sim no array que é passado como parâmetro para ele ( oDMat ), veja que você tem um browse para cabeçalho e outro para detalhes e o array é o mesmo. Em primeiro lugar, acho que deveria checar os dados deste array para depois verificar se o problema é de construção de tela.

    Abraço.

  2. Bom dia, a muito tempo não uso mais a Sqllib e um dos principais motivos eram os indices. A minha sugestão é abandonar a sintaxe xbase e adotar a linguagem pura do Sql, ai você não mais se incomodar, só que vai ter que reescrever boa parte dos seus comandos. Se quiser ajuda na criação de indices no Sql puro pode contar comigo, já no xbase, não tenho como ajudar.

    Abraço.

  3. Erciley, obrigado pela dica, era o setsize mesmo, retirei o mesmo e funcionou igual a antes, interessante é que na versão 0905 sem o setsize não funcionava, testei também na versão 1206 não funcionava. Acredito que deva ser alguma melhoria de versão, agora tudo ok para usar a 1209.

    Abraços a todos.

  4. Boa tarde.

    Erciley, grato pela dica, mas fiz o testes, e não é isso, continuou na mesma, o objeto existe, está ativado, mas não mostra.

    Kapiaba, este framework já desenvolvi ele a quase 20 anos, o conceito é antigo, já usava este método de trabalho desde o clipper/dos, foi assim que migrei para windows sem ter que reescrever os mais de 500 fontes da minha aplicação, já uso ele desde a versão demo do fivewin, só agora que experimentei este tipo de problema. A unica coisa que mudou um pouco a mais agora é o fato de pela primeira vez estar usando o bcc582 ao invés do bcc55. Vou continuar na busca, qualquer novidade coloco aqui.

    Abraços.

  5. Segue o fonte:

    FUNCTION DefineEdit( oEdt,oWin )
    LOCAL oFontMemo
    LOCAL nAlt := ( ( oEdt[ 3 ] - oEdt[ 1 ] ) * 16 ) / 2 // H_FONT_GET
    LOCAL nLar := ( ( oEdt[ 4 ] - oEdt[ 2 ] ) * 8 ) / 2 // W_FONT_GET
    LOCAL oWinConteiner


    IF oEdt[ 10 ] == NIL
    oFontMemo := tFont():New( "Courier New",0,-12,.F.,,,,,,,,,,,, )
    ELSE
    oFontMemo := oEdt[ 10 ]
    ENDIF

    IF oWin[ 19 ] != NIL .and. oEdt[ 9 ] > 0
    oWinConteiner := oWin[ 19 ][ 8 ]:aDialogs[ oEdt[ 9 ] ] // objeto folder
    ELSE
    oWinConteiner := oWin[ 06 ]
    ENDIF

    oEdt[ 7 ] := SW_TMultiGet():New( oEdt[ 1 ]*H_FONT_GET ,;
    oEdt[ 2 ]*W_FONT_GET,;
    {|u|If(PCount()==0,oEdt[ 5 ],oEdt[ 5 ]:= u ) },; // var
    oWinConteiner,; // janela
    nLar,; // largura
    nAlt,; // altura
    oFontMemo,;
    oEdt[12],; // barra scrool horizontal
    ,,,.T.,,.F.,,.F.,.F.,.F.,,,.F.,;
    , oEdt[13] ; // barra vertical
    )

    oEdt[ 7 ]:SetPos(0,0)
    oEdt[ 7 ]:lReadOnly := oEdt[ 6 ]
    oEdt[ 7 ]:SetSize( nLar, nAlt )
    oEdt[ 7 ]:bChange := {||_CheckButtons( oEdt, oWin ) }
    oEdt[ 7 ]:bValid := oEdt[ 11 ]
    oEdt[ 7 ]:bEventKeyArrows := oEdt[ 14 ]

    RETURN( oEdt )

    Tenho um framewortk que faz tudo pra mim, entao a janela e outros objetos sao declarados e criados em outros fontes e chamam esta função, que é o único ponto que se cria o objeto. Lembrando que todos os parâmetros já foram muito bem debugadinhos, inclusive dentro da própria classe MGet. E observe que não uso comandos chamo a função criadora do objeto diretamente.

  6. Desaparece como?? Mostre imagens, e o codigo... Está MULTINE?

    Menu principal está assim?

    REQUEST DBFCDX, DBFFPT

    Sim Kapiaba, tudo dentro dos conformes, mas não tem nada a ver com banco de dados, são gets de variáveis de memoria mesmo, não uso dbf, e estão todos multiline sim. O codigo nao muda nada em relação a compilar com uma versão ou outra, alias estes fontes funcionam a muitos anos sem mexer, com muitas outras versões antigas. Mas obrigado ai pelo esforço.

  7. Boa tarde, gente, alguém já passou por esta situação, estou tentando migrar do 0705 para o 1209 ( ultima versão que tenho ) e quando compilo todos os fontes, no exe novo que gera os campos get memo simplesmente somem. Já tentei de tudo quanto é debub mas nao descobri. Basta compilar de novo com o 0705 e tudo volta ao normal, como se nada tivesse acontecido. Alguém já já viu uma barbaridade assim?

    Abraço

  8. Obrigado Erciley, mas é que esta usando CDO eu usava já bem antes, de repende começou a dar pau inexplicavelmente,,.rs.rs, ai como fiquei sem solução também, parti para o esta que estava funcionando legal, até dias atras...hehe.

    Valeu

    Resolvido - Voltei a usar o CDO, após checar e corrigir varios parametros, ok.

  9. Bom dia, usei a função hb_sendmail() para envio de emails durante muito tempo, funcionando perfeito, de um tempo pra cá, após eu atualizar a versão do fivewin, simplesmente dá erro de GPF, tentei debugar e ocorre o problema bem na linha

    TRY

    oUrl := tUrl():New( "smtp://" + cUser + "@" + cServer + '/' + cTo )

    CATCH

    lReturn := .F.

    END

     

    exatamente como o problema do Luiz Augusto estava enfrentando.

     

    Alguem sabe como foi resolvido?

  10. Amigos, obrigado a todos que estão tentando ajudar, na verdade tudo que foi citado em termos de ordem de lib, etc ja foi feito e é assim que o script está. Quanto a colocar tudo dentro de um prg é impossivel, já que o projeto inteiro são mais de 550 Prgs. Quanto a renomer as funções, também não tem como, pois muitas são classe nativas do fivewin que apenas acrescentei alguma customização. Tudo funcionou perfeitamente até trocar o nome do projeto e da pasta, alias, voltei atras e nem assim adiantou, por isso insisto que deve ser problema do xMate, também uso a muito tempo, mas acredito que pela quantidade de fontes algum erro de script esteja ocorrendo. Ao sambob, o seu xmate é em portugues?

    Grato a todos por enquanto.

     

    Abaixo uma imagem do script do xmate:

    Untitled.png

  11. Boa tarde, tenho uma lib que uso para colocar minhas próprias funções,
    porém ao executar ao aplicativo, ao invés de executar as minhas funcoes, são executadas
    as funções do fivewin que tem o mesmo nome, alguém sabe o porque disso?
    Uso o xmate e sempre funcionou ok, agora so porque troquei o nome do
    projeto ficou assim. Por exemplo, a função alert eu tinha reescrito ela e
    funcionava de acordo com meu fonte, agora funciona o alert original.

×
×
  • Create New...