Categoria: Lazarus

Instalando Componentes ACBr no Lazarus e testando exemplo SAT com emulador SEFAZ

Posted By: Daniel MoraisPosted On:

Resolvi criar um vídeo mostrando o passo-a-passo de como instalar os componentes do Projeto ACBr.

Para quem não conhece o pacote de componentes do Projeto ACBr ele é mantido por uma equipe que hoje já é uma comunidade gigantesca trabalhando no desenvolvimento de componentes para automação comercial como:

Impressoras Fiscais, Gavetas de Dinheiro, Impressoras de Cheque,
Transferencia Eletrônica de Fundos (TEF), Monitor de Bombas de
Combustível,
Display de Mensagens, SAT-CFe, NFs, NFe, PAF, etc.

Após a instalação dos componentes, vamos compilar o exemplo ACBr SAT e testar a comunicação com emulador Off-line SAT da SEFAZ (Secretaria da Fazenda)

Assista o vídeo:

Site ACBr: http://acbr.sourceforge.net/drupal/
Forum ACBr: http://www.projetoacbr.com.br/forum/
Blog do Regys Silveira: https://regys.com.br/como-instalar-o-trunk2-do-acbr/
SVN: https://tortoisesvn.net/downloads.html
Repositório ACBr: svn://svn.code.sf.net/p/acbr/code/trunk2
Forte Report: https://github.com/fortesinformatica/fortesreport-c
Emulador SAT Off-line SEFAZ: http://www.fazenda.sp.gov.br/sat/downloads/vigentes.asp

Curso de Programação: 08 pt 08 Criando Relatório de Clientes

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas
arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Neste vídeo vou mostrar como criar um relatório de clientes no Lazarus utilizando o componente LazReport.

Instalando Lazarus (Free Pascal) no OS X

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Nesta vídeo aula vamos aprender a instalar o Lazarus no OS X da Apple e desenvolver o tradicional programa Olá Mundo !

Inscreva-se no youtube/infocotidiano e fique ligado nos novos vídeos !

Curso de Programação: 08 pt 07 / 3 Trigger para atualizar saldo do estoque

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas
arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Nesta vídeo aula vamos aprender a criar um gatilho (trigger) para atualizar o estoque de produtos automaticamente quando fizermos uma inclusão ou exclusão de item na tabela filho/detalhe do item do estoque.

Lazarus 0008 part 007, Cadastro Mestre e Detalhe (pai e filho) Estoque

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Nestas duas vídeo aulas vamos aprender a criar um formulário mestre e detalhe ou pai e filho ou master detail utilizando Lazarus e base de dados Firebird.

Vídeo 1 – Mestre / Master / Pai

Vídeo 2 – Detalhe / detail / Filho

Lazarus 0008 part 006. Cadastro de Formas de Pagamento

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Nesta vídeo-aula vamos dar continuidade do nosso sistema de vendas e estoque.
Vamos criar um formulário CRUD (Create, Retrieve, Update e Delete) para controlar as Formas de Pagamento

Assista o Vídeo:

Lazarus 0008 part 005. Cadastro de Produtos

Posted By: Daniel MoraisPosted On:

Lazarus é um ambiente de desenvolvimento integrado desenvolvido para o compilador Free Pascal.

O software é compatível com o Delphi e, ao mesmo tempo, suporta diversas arquiteturas e sistemas operacionais como Windows, Linux e MAC OS X.

Nesta vídeo-aula vamos dar continuidade do nosso sistema de vendas e estoque.
Vamos criar um formulário CRUD (Create, Retrieve, Update e Delete) para controlar os Produtos.

Funções utilizadas:

   function Tfrmproduto.CalculaVenda(cCUSTO,cLUCRO :string):String;
   {Acha preco de venda (Custo * (Lucro /100)) +Custo}
    var
      nCUSTO, nLUCRO, nVENDA : real;
   begin
      try nCUSTO:=StrToFloat(cCUSTO); except nCUSTO:= 0; end; // Converte Custo
      try nLUCRO:=StrToFloat(cLUCRO); except nLUCRO:= 0; end; // Converte o Lucro
      nVENDA := ((nCUSTO * (nLUCRO /100)) + nCUSTO) ;
      result := FloatToStr( 0.01*Trunc(100*nVENDA) );
   end;

   function TfrmProduto.AchaLucro(cVenda, cCusto:string):string;
   {Acha Percentual ((Venda – Custo) / Custo) * 100}
    var
      nCUSTO, nLUCRO, nVENDA : real;
   begin
      try nCUSTO:=StrToFloat(cCUSTO); except nCUSTO:= 0; end; // Converte Custo
      try nVENDA:=StrToFloat(cVenda); except nVENDA:= 0; end; // Converte a Venda
      nLUCRO:= (((nVENDA-nCUSTO) / nCUSTO) * 100);
      Result := FloatToStr( 0.01*Trunc(100*nLUCRO) );   // 12,89872 = 12,89
   end;

Coloque na propriedade OnCreate do Formulário Principal para formatar data e números:

  {$IFDEF LINUX}
     // Formatação de moeda
      CurrencyString := ‘R$’;
      CurrencyFormat := 2;
      DecimalSeparator := ‘,’;
      ThousandSeparator := ‘.’;
     // Formatação de datas
      DateSeparator := ‘/’;
      ShortDateFormat := ‘dd/mm/yyy’;
    {$ENDIF}

Assista o Vídeo:

Se gostou, clique em curtir na minha página do Facebook !