Jump to content
Fivewin Brasil

joaosolution

Membros
  • Posts

    805
  • Joined

  • Last visited

  • Days Won

    21

joaosolution last won the day on November 29 2018

joaosolution had the most liked content!

About joaosolution

  • Birthday 11/10/1977

Profile Information

  • Gender
    Male
  • Location
    Contagem / MG

Recent Profile Visitors

1,618 profile views

joaosolution's Achievements

  1. Muito obrigado pelas dicas. João ainda bem que vc está longe se estivesse perto te dava um beijo. Procurei muito a pdflib e não encontrei Emotta obrigado pelas dicas. Abraços
  2. Boa tarde, muito obrigado pelas ajudas Sim testei e não faz nada, não gera o arquivo, só gera com a função FWSavePreviewToPDF( oPreview,cDestino,.F. ) Estou partindo para a solução do emotta Abraços
  3. Boa tarde Meu FW 12.06 ainda não é o atual. Att
  4. Boa tarde Gero o relatório, e salvo em pdf. FWSavePreviewToPDF( oPreview,cDestino,.F. ) Salva 10 e ocorre o erro Att
  5. Opa, Obrigado! Estou gerando vários relatórios em PDF simultâneos, está ocorrendo erro 9006 na aplicação. Então estava querendo gerar o pdf em um EXE separado para não ocorrer o erro de memória. Abraços
  6. Bom dia, obrigado pelo retorno João, mas no exemplo só trabalho com concatenação de varáveis string. Estava precisando passar um objeto como parâmetro. Att
  7. Bom dia Estou precisando enviar um objeto de uma aplicação para outra, ex: winexec(" PROGRAMA.EXE "+oDlg ) Alguém já fez algo parecido, ou têm uma sugestão? Abraços
  8. Boa tarde Não está faltando uma aspas simples nessa consulta? oRSpedido := ConectaBD():RowSet( "SELECT * FROM pedido WHERE nomusu = '" + AllTrim(cNomUsu) + "' ORDER BY id DESC LIMIT 1" ) Att João Bosco
  9. Wanderson Boa tarde Na pasta \fivewin\samples tem o arquivo xbrwtree.prg que mostra o xBrowse com tree, as vezes por este exemplo fica mais fácil de você efetuar o seek dentro do browse. É só uma sugestão. Att João Bosco
  10. Este aqrquivo é o modelo em RTF para gerar o HLP O HLP pronto depois de compilado é grande, qual e-mail posso te enviar?
  11. Segue um exemplo. Se não me engano você deve utilizar um programa para compilar o rtf em HLP, microsoft help editor. Mas não tenho o arquivo aqui agora. DocMedW.rtf
  12. Bom dia HELPSETTOPIC("Setores") Este iten Setores é um índice dentro do arquivo HLP. Att João Bosco
  13. Caro Jose Desta forma não vai funcionar pois quando vc dá um dbselectarea vc têm uma instância dos dados nesta área aberta. Neste caso vc terá que usar o dbselectarea novamente para carregar as atualizações efetuadas. E dar um refresh no listbox. Att
  14. Bom dia Vc já tentou usar o commit: oSql := SR_GetConnection() cComm := "DELETE FROM IDEMPREG_DBF "+; "WHERE EMPRESA=NULL" nErr := oSql:exec( cComm,, .T.,@nReturn) oSql:Commit() Att João Bosco
  15. Boa tarde Verifique a \fivewin\source\function\errsysw.prg. cErrorLog := "" cErrorLog += CRLF + "Variaveis em uso" + CRLF + "================" + CRLF cErrorLog += " Procedure Type Value" + CRLF cErrorLog += " ==========================" + CRLF i := 2 // we don't disscard any info again ! while ( i < 74 ) if ! Empty( ProcName( i ) ) cErrorLog += " " + Trim( ProcName( i ) ) + CRLF for j = 1 to ParamCount( i ) cErrorLog += " Param " + Str( j, 3 ) + ": " + ; ValType( GetParam( i, j ) ) + ; " " + cGetInfo( GetParam( i, j ) ) + CRLF next for j = 1 to LocalCount( i ) cErrorLog += " Local " + Str( j, 3 ) + ": " + ; ValType( GetLocal( i, j ) ) + ; " " + cGetInfo( GetLocal( i, j ) ) + CRLF next endif i++ end
×
×
  • Create New...