Ir para conteúdo
  • Cadastre-se

vitorpires

Membros
  • Total de ítens

    7
  • Registro em

  • Última visita

Posts postados por vitorpires

  1. 2 horas atrás, BigWings disse:

    Isso é um problema em usar TFields persistentes.

    Se mudar qualquer coisa, Delphi, Firebird, componente de acesso o mapeamento dos TFields pode ser diferente e vai ter esses erros.

    Aí tem que ficar ajustando...

    verdade. Muito obrigado!

    11 horas atrás, Juliomar Marchetti disse:

    Não foi você quem postou algo sobre conectar com zeos no firebird?

    Não, Juliomar. Mas obrigado pela atenção.

  2. Testei a alteração sugerida pelo BigWings, e realmente voltaram a funcionar os campos tQrdbText numericos e os tQRExpr. Ainda assim não convém ter que ajustar todas as queries usando o cast.

    Creio que tem alguma coisa a ver com ControlCodePage, ClientCodePage e talvez AutoEncodeStrings.. Por exemplo, no select de um campo string tamanho 1, agora me dá a expressão "Type Mismatch.Expecting WideString actual String ". Ocorreu parecido com um campo numérico,, 

  3. 3 horas atrás, BigWings disse:

    Tenho o Quick mas nunca usei Zeos, instalei ele aqui pra fazer o teste.

    Acredito que seja algo com o mapeamento dos TFields feito pelo Lazarus que o QuickReport não esteja suportando...

    Usando o seu projeto de exemplo criei a base com o campo VR_TOTAL com NUMERIC(15, 2) dessa forma a soma não apareceu.

    Com a mesma base mas usando Firedac não houve problema.

    O Zeos cria o TField do VR_TOTAL como TExtendedField. Caso você use um CAST na query para, por exemplo:

    select [...], cast(VR_TOTAL as DOUBLE PRECISION) VR_TOTAL from NFSITEM

    O campo passa a ser TFloatField e a soma do QuickReport passa a funcionar...

    hum, muito interessante, BigWings. 

    Vou testar a alteração no select.

    Obrigado.

  4. 19 horas atrás, Juliomar Marchetti disse:

    O suporte da QuickReport não conseguiu nada?

    outra sugestão é migrar seus relatórios para Fast Report ou FortesReport que é gratuito.

    sei que no Fast Report tem units que ajudam na conversão do Quickreport para ele gerando fr3

    E, Juliomar, até já converti um relatório para fortes, como teste. fiz rápido, então complicou um pouco em relação aos qrGroups, mas de forma genérica, apenas alterei no .dfm:

    TQuickRep->TRLReport
    tqrimage->trlimage
    tqrband->trlband
    bandtype rbdetail->btDetail
    tqrdbtext->trldbtext
    tqrlabel->trllabel
    tqrexpr->trldbresult
    rbSummary->btSummary
    tqrgroup->trlgroup->

    e funciona bem para relatorios simples.
    Nunca acionei o suporte do quickreport. Vou ver se encontro alguma dica, caso contrário o trabalho vai ser grande.

    Se alguém souber de algo, favor informar. Se eu achar o problema, posto aqui.

    Obrigado.

  5. Ola, Pessoal. 

    Migrei o sistema do Delphi7 para o Delphi 10.3 Rio, e coloquei o quickreport 6.0 build 4.25.

    Foi quase tudo bem, exceto uns problemas entre o usercontrol com o conector Zeos e a zeoslib, que consegui resolver.

    O problema que me travou mesmo é que os campos numéricos com mascara não são impressos na rbdetail, tive que limpar a máscara do tqrdbtext e usar  TFloatField.displayformat apos abrir a query.. No entanto, os campos tQRExpr com função Sum não são impressos, e não consigo avançar com o sistema. Não imprimem no qrGroupFooter nem na rbSumary. Agradeço muito se alguém puder ajudar.

    Configuração: o Quickrep aponta para zq e zq ponta para zconnnection

    execucao.JPG

    projeto.JPG

    Project1.zip

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...