RedIDSoftware

Bom dia pradilson você pode colocar uma verificação no create do relatório MenuPrincipal.RLPreviewSetup1.EnabledButtons := [pbSave, pbSend, pbCustom]; e no onClose voltar ao estado inicial MenuPrincipal.RLPreviewSetup1.EnabledButtons := [pbPrint, pbSave, pbSend, pbCustom];

Obrigado Juliana vou ver sim.

Não tem mistério, é só adicionar o RLPreview no formulário e no quando for dar o preview passar RlReport.preview(MeuRLPreview); a vantagem é que você pode criar um formulário de pré visualização totalmente parametrizável do zero, você pode amarrar ele com o seu gerenciador de direitos e fazer como quiser. Atenciosamente José Ricardo.

Bom dia a todos a anos eu utilizo o Fortes Report e até então só utilizava o filtro para salvar em PDF, mas estou desenvolvendo um projeto onde pensei em utilizar o filtro para salvar em html para exibir direto no browser para ver como fica, mas nunca tinha utilizado eu adiciono o RLHtmlFilter no formulário e ele não aparece no dialogo para salvar. Tem algum macete para utilizar este filtro? Muito obrigado amigos.

Bom dia pradilsoncarlos, acho que neste caso você terá que utilizar o componente RLPreview e montar um formulário de preview personalizado ai na hora da impressão você vai passar RlReport.preview(MeuRLPreview); que o fortes ira carregar a visualização do relatório dentro deste RLPreview. Espero ter ajudado. Sucesso José Ricardo

Entendi Daniel muito obrigado pela ajuda.

eu uso onDatachange mais a implementação dele esta no meu form base TB_NOVO.Enabled := (TADOQUERYSQL(Screen.ActiveForm.FindComponent(NomeQuery)).State = dsBrowse) and (UInsere) and (NInsere); TB_ELIMINA.Enabled := (TADOQUERYSQL(Screen.ActiveForm.FindComponent(NomeQuery)).State = dsBrowse) and (not TADOQUERYSQL(Screen.ActiveForm.FindComponent(NomeQuery)).FieldByName(Campo).IsNull) and (UExclui) and (NExclui); TB_GRAVA.Enabled := (TADOQUERYSQL(Screen.ActiveForm.FindComponent(NomeQuery)).State = dsInsert) or (TADOQUERYSQL(Screen.ActiveForm.FindComponent(NomeQuery)).State = dsEdit); TB_CANCELA.Enabled := TB_GRAVA.Enabled; Esse TADOQUERYSQL eu estou reescrevendo minha aplicação pra Lazarus RESTDataware então estou migrando aos poucos, vlw.

Aproveitando uma duvida me ocorreu, eu estou vendo algumas diferenças no aproach do MDI para TDI no caso eu automatizava muita coisa com Screen.ActiveForm.FindComponent(... para localizar componentes de dados e administrar o CRUD como isso fica no TDINotebook, visto que o ActiveForm sempre vai ser o form principal da aplicação? Mais uma vez obrigado.

Boa tarde Daniel a unit funcionou vou continuar testando muito obrigado pela ajuda.

Obrigado pelo retorno Daniel eu ja vou testar

Bom dia a todos, estou iniciando o uso do TDI Notebook e me deparei com uma duvida, como eu emulo o onFormActivate no form dentro de uma aba? Se não for possivel, existe alguma forma de emular ele quando o form da aba ficar novamente visivel? Muito obrigado a todos. José Ricardo

Muito obrigado Rafael, era exatamente isso agora só vou fazer alguns ajustes no componente para pois ele apresenta algumas falhas em relação a versão do Delphi, eu estou apanhando um pouco do Lazarus por ser diferente, mas estou gostando muito, Muito obrigado pela ajuda.

Olá a todos, eu utilizo um componente chamado TAutoUpdate que atualiza e implementa atualizações executáveis de um projeto via FTP, o componente e as fontes estão neste repositório para qualquer um que queira usá-lo muito: https://bitbucket.org/redid_software/autoupdate/src/master/lazarus/ no Dephi funciona perfeitamente. A pouco tempo comecei a converter alguns projetos Delphi para o Lazarus e comecei com meus componentes, os componentes visuais que eu era capaz de converter normalmente, mas esse componente específico, o TAutoUpdate, está apresentando um erro ao compilar a linha 704 Client.OnWorkBegin: = FTPWorkBegin ; Já tentei passar como ponteiro Client.OnWorkBegin: = @FTPWorkBegin; mudei o analisador para o modo Delphi, mas nada funcionou. Ajudem-me, eu não domino a construção de componentes, eu realmente não sei o que estou fazendo de errado. Obrigado.

Bom dia a todos, gostaria de saber se algum dos colegas trabalha com a DANFE FAST embarcada no exe da aplicação ou armazenada dentro do banco de dados, eu estou fazendo uma limpeza em uma de minhas aplicações e queria de alguma forma não ter de distribuir o arquivo avulso com a aplicação. Alguém poderia me ajudar? Obrigado

Boa tarde Sérgio é exatamente o que eu faço, eu pego o xml direto do componente e gravo a string do xml dentro do banco de dados, mais por serem varias notas diariamente o tamanho disparou, segue imagem. Dae eu to considerando compactar a string do xml antes de armazenar e quando for utilizar pra exportar ou mesmo visualizar a danfe impressa, eu descompacto armazeno em uma variável e utilizo. Só queria saber se algum dos colegas ja passou por isso e como resolveu. Sucesso.

Bom dia a todos, eu tenho um cliente que é um grande atacadista ele emite centenas de notas fiscais por dia, para facilitar o processo de impressão também por segurança eu além de gerar a DANFE na pasta, armazeno-a também no banco de dados, o problema é que com o tempo, o tamanho do banco de dados foi aumentando, como também tenho neste cliente um modulo de produção com composição de produtos integrado ao estoque, achei que eram as tabelas de produção as responsáveis pelo aumento do tamanho do banco de dados, fiz um script para calcular o tamanho das tabelas no banco e constatei que era a tabela do faturamento a responsável, pensei em compactar a string e armazenar no banco e quando for utilizar para leitura, descompacto-a, a pergunta é, algum dos colegas já passou por isso? qual foi a solução? e se o acbr possui alguma ferramenta para realizar este processo.Muito obrigado a todos. José Ricardo

eu estava lendo os fontes do componente aqui e achei a causa, neste caso para não dar o erro: "DigestValue do documento <CHAVE>não confere. é só setar no componente Acbrnfe1.Configuracoes.Geral.ValidarDigest := False; E fazer a consulta pelo xml carregando ele var ss: TStringStream; ss := TStringStream.Create(Q_NF.FieldByName('nf_xml').AsString); Acbrnfe1.NotasFiscais.Clear; Acbrnfe1.NotasFiscais.LoadFromStream(ss); //ou LoadFromFile(CaminhoXML); é que eu guardo o xml no banco tbem, pra garantir Acbrnfe1.Consultar; Neste momento ele já atualiza o xml carregado no componente e grava o xml atualizado dentro da pasta, é show de bola. Muito obrigado a todos pela ajuda. Atenciosamente José Ricardo

Obrigado pela resposta Kiko, eu não utilizo o AcbrMonitorPlus, utilizo o componente AcbrNFe, eu tenho um cliente onde eventualmente ocorre falha na internet durante a transmissão, ae ele tem de baixar o xml pelo site da secretaria da fazenda e importar pra dentro do sistema, pq o xml que fica na pasta não possui a parte da aprovação do SEFAZ, não tem digVal nem nProt, existe alguma forma de atualizar o XML com estas informações diretamente pelo AcbrNfe? Eu tentei fazer a consulta carregando o xml local pra ver se o componente atualiza ele mais o erro retornado é: "DigestValue do documento <CHAVE>não confere." Muito obrigado pela ajuda. José Ricardo.

Como assim Juliomar, consulta de protocolo? Como isso funciona? Atenciosamente. José Ricardo

Ok valeu eu tenho um pouco de receio com tudo no 2009 por que eu conheço mais gente usando o delphi 2005 doq ele, mais ele me supre totalmente entao nao vejo motivos para migrar a versao(do Delphi), muito obrigado pela resposta

Boa tarde Juliomar, não entendi a resposta, não=>não deu certo; não=>não tive problemas ou não=>nao utilizo delphi 2009? Obrigado

Boa tarde a todos, gostaria de saber se algum dos colegas esta usando o Delphi 2009 com Windows 10 a partir da atualização do Windows 7, e se deu tudo certo? Muito obrigado pela ajuda. Sucesso a todos.

Olá Gefferson é isso mesmo, eu tenho uma situação onde a tabela q eu tinha aq era: 1708600 | 1604 | Preparações e conservas de peixes; caviar e seus sucedâneos preparados a partir de ovas de peixe; exceto sardinha em conserva, tenho Kani q é NCM 16042090 que entraria nessa categoria, dae eu ia fazer uma rotina onde vc alimentaria esse ncm '16042090' e ele ja traria o cest 1708600 mas baseado nesse '1604' mas ae com essa 'tabelona' ja fica mais show!!! oq vc acha, implemento isso ou uso essa tabela completa? Eu não sei oq o pessoal esta fazendo. Muito obrigado.

Boa tarde a todos, estava pensando em criar uma rotina para trazer o codigo do CEST automaticamente quando alimentado o ncm do produto com base naquela tabela TAB_CEST disponibilizado pelos colegas, a zica na tabela éq o governo "resumiu" alguns NCMs para economizar papel eu acho, entao gostaria de saber se ja existe essa rotina montada ou posso montá-la para disponibilizar para a comunidade? Antes de qualquer coisa EU VI QUE FOI PRORROGADA PARA 10/2016 e agora pra 01/2017 mais acho q eles nao vao recuar com isso infelizmente Muito obrigado a todos e sucesso!

Exatamente tbem estou com o mesmo problema, notas fiscais em lote ele traz o numero de folhas corretos mais o total traz a soma de todas as folhas do lote ex: 11 nf-es no lote, folha nota 1 - 1/11...nota 2 - folha 1/11 ... nota 3 - folha 1/11. Fast versao - 5.1.9 Obrigado pela atenção.