adilsonpazzini

Rafael ... Obrigado ... velho . eu ate errei . na verdade era a funcao de Set .. mais ache aqui e nos meus testes deu certo .. SetDefaultPrinter //procedure SetDefaultPrinter(PrinterName: String); //var // I: Integer; // Device : PChar; // Driver : Pchar; // Port : Pchar; // HdeviceMode: Thandle; // aPrinter : TPrinter; //begin // Printer.PrinterIndex := -1; // getmem(Device, 255); // getmem(Driver, 255); // getmem(Port, 255); // aPrinter := TPrinter.create; // for I := 0 to Printer.printers.Count-1 do // begin // if Printer.printers = PrinterName then // begin // aprinter.printerindex := i; // aPrinter.getprinter; // (device, driver, port, HdeviceMode); // StrCat(Device, ','); // StrCat(Device, Driver ); // StrCat(Device, Port ); // WriteProfileString('windows', 'device', Device); // StrCopy( Device, 'windows' ); // SendMessage(HWND_BROADCAST, WM_WININICHANGE, // 0, Longint(@Device)); // end; // end; // Freemem(Device, 255); // Freemem(Driver, 255); // Freemem(Port, 255); // aPrinter.Free; //end; Montei com essa funcao ... procedure SetDefaultPrinter(const PrinterName: String); begin Printers.Printer.SetPrinter(PrinterName); end; Mais Valeuuu ....

Estava usando essa função no Delphi7 function GetDefaultPrinterName : string; begin if(Printer.PrinterIndex >= 0)then begin Result := Printer.Printers[Printer.PrinterIndex]; end else begin Result := 'Nenhuma Impressora Detectada'; end; end; Ao trazer para Lazarus não funcionou .. andei pesquisando na NET mais não achei nada .. alguém tem ai alguma função pra pegar qual impressora default no Windows .ou ate se existe algo assim pra mult-plataforma . Sem mais , Adilson Pazzini .

Boa tarde . Parece ter sido prorrogado novamente .. agora para 02/07/2018 . Conforme Nota Técnica 2016.002 - v 1.42 http://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo=uvfnqOj spg= http://www.nfedobrasil.com.br/2017/11/foi-alterada-data-de-ambiente-de-producao-da-nf-e-4-0-para-dezembro-de-2017/

Muito Obrigado Rafael pelo Retorno . Adilson Pazzini .

Valeu Irmao .. t+

Concordo ... pra vc ter uma base . o cara me ameaçou a tirar o meu sistema e contratar outro , se eu não tirar a mensagem do "IMPOSTO APROXIMADO" .rs

isso que pensei mesmo . vou ter que ter algo escrito por ele .. vc sabe o motivo disso ... ele alega que os clientes estão reclamando do imposto, e que ja perdeu vendas por isso ... kkkk .. e que por isso que nao queria que sai-se na nota ..

Obrigado Felipe ...que duvida cruel ... ai entro no site de olho no imposto e la diz : conforme imagem em anexo ... e tambem vi um tyexto no DANFE onde diz ser Opcional : O “Valor Aproximado dos Tributos” calculado pela empresa, correspondente a totalidade dos tributos federais, estaduais e municipais, cuja incidência influa na formação do respectivo preço de venda, opcionalmente poderá aparecer no DANFE no campo de Informações Adicionais do Produto (tag: infAdProd, id:V01) e/ou no campo de Informações Complementares da NF-e (tag: infCpl, id:Z03).

Ate a obrigatoriedade na verdade que vejo mais para a impressao danfe .. No manual da NFe . disse ser Opcional .. sera que é isso mesmo ?

Queria saber se é ou nao obrigatório informar IBPT para empresa do Regime Simples Nacional , pois hj eu estou destacando , porem um cliente meu que é simples nacional me disse que nao é obrigatório e ele nao quer que saia a mensagem na NF .. ele ate me enviou um link onde ele viu isso ... http://qsconsultoria.com.br/valor-aproximado-de-tributos-perguntas-e-respostas/ Se alguem puder me informar AgradesÇo . Adilson PAZZINI

Achei o problema .. no antes do Lfm .. coloquei ',' e tinha que ';' .. Valeuuuu

Valeu Daniel , então estou tentando pelo FIND IN FILES ... mais não consegui .. Eu queria por exemplo alterar a propriedade AlternateColor do DBGrid . de todos os formulários que o contem .. de uma so vez . . tentei pelo FIND IN FILES . mais nao retornada .

Lazarus 1.8 - Existe possibilidade de alterar propriedades de um componente nos arquivos .lfm dos formularios. Estou precisando alterar uma propriedade do DBGrid em todos os formulários que o contem . uma propriedade do DBGrid ? Sem mais, Adilson Pazzini

Achei um dos problemas , e porque existem outras Units referenciando em um formulário que não estão anexados no projeto, e ai ele da esse erro ai , conforme adiciono para o problema . Adilson .

Fiz a conversão do projeto total de Delphi7 para Lazarus .. porem em alguns formulários deu esse problema "Error: Wrong token type: = expected but Symbol found (at 529,16, stream offset 000039D3)" , ai exclui o lfm criado pelo conversor e copiei o .dfm como .lfm . e abriu normal .. porem tive que ajustar os acentos na tela, porem . ao ir incluindo no projeto . o mesmo erro acontece na hora de compilar .. dando o erro abaixo : se alguem ja passou por isso e puder me ajudar . agradeço . Alguem aqui ja pegou esse erro no Lazarus ? estou criando um projeto novo e adicionando as units e forms .. Error: Wrong token type: = expected but Symbol found (at 529,16, stream offset 000039D3) dms.lpr(33,1) Error: Error while compiling resources -> Compile with -vd for more details. Check for duplicates. Lazarus 1.8 . Windows 7 32 Bits . Sem mais , Adilson Pazzini

Fmz Rafael ... VALEUUU Vou testar aqui . Adilson Pazzini .

Boa tarde, Seguinte . estou tendo problemas para envio da NF-e usando o AcbrNFe, onde quando vai fazer a assinatura do xml da o erro "Falha ao localizar o nó de Assinatura" , so que isso somente esta acontecendo quando o EXE ja esta compilado e no Cliente , na maquina onde tem o Delphi nao acontece, ai vi em alguns topicos onde dizem que tem que ajustar o “Debugger Exception Notification” , achei uma forma na internet pelo link https://pt.stackoverflow.com/questions/5917/há-como-desabilitar-o-debugger-exception-notification-do-delphi Delphi 7 - No menu superior, clique em Tools-Debugger Options abrirá uma janela, navegue até a aba Language Exceptions e você verá uma checkbox dizendo [ ] Stop on delphi exceptions marque-a, pronto. so que ao entrar no mesmo . ja esta marcado . e mesmo assim . da esse problema . Sera que devo desmarcar essa opcao para que ele ignores esse tipo de Exception ? Sem mais, Adilson Pazzini .

Estou com o mesmo problema . porem no DELPHI7 ... vi eles comentando algo sobre ignorar Exceptions, mais no delphi7 nao consegui fazer isso . So que no DELPHI 7 . so acontece na estacao do cliente .. se usar dentro do Delphi7, Nao ocorre esse problema .

OK

OK Entendi , ainda esta tendo compatibilidade do Delphi7 com o Acbr ?

uso Delphi7 . qual a diferença de eu carregar um xml com true no final ou false .. AcbrNFe.NotasFiscais.LoadFromFile(busca.FileName, true); fiz uma atualizacao na sexta e se deixo vazio essa propriedade vi que ele pega automatico como false so que ao gravar no banco da erro pra gravar o blob.. percebi que quando ta como false , se tem acentos em qualquer parte das informacoes do xml , ele traz Agora se carrego o mesmo arquivo com true no final . vem certinho a parte de acentos . alias . ele arranca os acentos .. eu posso utilizar essa opcao de true no final pra gravar os xml no banco , pois sem ,. nao ta deixando . fica dando erro de "Malformed String" agora se uso o True como parametro no final . ele grava certinho . vi que ele tira os acentos no xml .. tem algum problema utilizar essa formar de carregar o arquivo xml com o true no final ? sem mais, Adilson PAzzini

Acho que o problema para união e o PIS e COFINS sobre servicos .. que ai como esta nas maos das prefeituras hj a gestao da NFSe, fica ruim para eles controlarem .talvez por isso esse projeto nacional .

Obrigado pelas respostas .. vi la que fala sobre NFCe para usar com Integrador . nao vi nada sobre NFe .. vai ter que integrar tambem NFe ?

Boa tarde . Onde posso ler sobre emissão de NFe ou NFCe para o Integrador ... existe prazo para implementação já ? Seria somente para o Estado do CEARA ? Desde ja agradeço Adilson Pazzini

Beleza Jose . obrigado pelo Retorno ... fico no aguardo . Adilson Pazzini .