Fórum Script Brasil > Código de Barras passo a passo desde o início

Versão Completa: Código de Barras passo a passo desde o início

Fórum Script Brasil > Programação & Desenvolvimento > Delphi, Kylix

--MXVinícius --

30/11/2007 - 08:19

Prezados,

Então, como funciona o código de barras no Delphi?
Qual a melhor forma de fazer?
Como se começa?
Como é conectado no banco?
Quais dados ele usa para gerar?
Como escolher qual tipo usar?
Como colocá-lo em um relatório QRep?
Enfim, não sei nada, não consigo encontrar no GOOGLE.

Podem me dar uma força?

Abs,

Vinícius.

Felipee

30/11/2007 - 09:48

cara,

o codigo de barras não tem segredo.
seu codigo é gerado com as barras (bãããã).

existe um componente que faz isso pra você: o barcode

faz um pesquisa no google que você acho.

Qual a melhor forma de fazer?
componente
Como se começa?
componente
Como é conectado no banco?
componente como com o dbedit
Quais dados ele usa para gerar?
automaticamente
Como escolher qual tipo usar?
bar 3 of 9
Como colocá-lo em um relatório QRep?
componente

espero ter ajudado.

felipee.

--MXVinícius --

01/12/2007 - 11:34

Estou tentando usar esse aqui:

http://www.veloso.kit.net/cjvbarcode.html

Mas ele só gera código para o primeiro item da tabela.

Estou usando o exemplo do site para fazer.

Também tentei assim:

CODE

//CodigoBarra: TAsBarcode; // variável

no form create você Cria a variável do código de barras.
procedure Tform1.FormCreate(Sender: TObject);
begin
     CodigoBarra := TAsBarcode.Create(self);
     CodigoBarra.Typ := bcCode39;
     CodigoBarra.Modul := 1;
     CodigoBarra.Ratio := 2.0;
     CodigoBarra.Height := 50;
     CodigoBarra.Top  := 1;
     CodigoBarra.Left := 1;
     CodigoBarra.ShowText := bcoNone;
end;

QRBand1 é a banda que tem o código de barra...
procedure Tform1.QRBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
     CodigoBarra.text := 'Aqui você coloca o texto que quiser';
     qriCodigoBarra.Picture := nil;
     CodigoBarra.DrawBarcode(qriCodigoBarra.Canvas);
     // qricodigobarra é aonde vai ficar a imagem do código de barra.
     qriCodigoBarra.Repaint();
end;

Conforme foi explicado no link: http://forum.clubedelphi.net/viewtopic.php...d5d9c199#124022

Mas também da erro Undeclared Identifier "DrawBarcode".

Gostaria de ajuda para implementar isso.

Grato,

Jhonas

03/12/2007 - 12:55

Endereços de Apostilas e Componentes para usar Codigo de Barras no Delphi

Apostila sobre codigo de barras EAN

http://br.geocities.com/all_software/downl...odbarrasean.zip
________________________________________________________________

Componente Barcode

http://www3.delphifontes.com.br/downloads/Barcode.zip
________________________________________________________________

Impressão de Codigo de Barras

http://www.guiadodelphi.com.br/artigos/codigo_barra1.htm
________________________________________________________________

Imprimindo código de barra no Crystal Report

http://www.guiadodelphi.com.br/ler.php?codigo=1139
________________________________________________________________

apresentação em Power Point que explica os padrões de código de barras utilizado no Brasil e no mundo.

http://www.ramosdainformatica.com.br/ser_d...?CDN=8&VN=2
________________________________________________________________

Download » Código » Codigo de barras para boletos I25

http://www.scriptbrasil.com.br/download/codigo/6491/
________________________________________________________________

Outro Codigo de Barras

http://www.apostilar.com.br/sel_apostila.php?id=1193
________________________________________________________________

CJVBarCode - código de barras para Delphi 7

http://superdownloads.uol.com.br/download/...arras-delphi-7/

Abraço

Esta é uma versão simplificada de nosso conteúdo principal. Para ver a versão completa com maiores informações, formatação e imagens, por favor clique aqui.