670
CENTRO DE INFORMAÇÕES
Novos códigos de barras
A rotina que gera códigos de barras em relatórios em geral foi revisada.

Sua sintaxe é (para recordar):


Procedure PaintBarCode(Elemento,Mensagem:string;Tipo,Largura,Altura,Aspecto:integer);


Onde o Tipo pode receber os números:

0 -> Code2_5_interleaved <-- Ex.: Barra de boletos de cobrança
1 -> Code2_5_industrial,
2 -> Code2_5_matrix,
3 -> Code39,
4 -> Code39Extended,
5 -> Code128A,
6 -> Code128B,
7 -> Code128C,
8 -> Code93,
9 -> Code93Extended,
10 -> CodeMSI,
11 -> CodePostNet,
12 -> CodeCodabar,
13 -> CodeEAN8,
14 -> CodeEAN13,
15 -> CodeUPC_A,
16 -> CodeUPC_E0,
17 -> CodeUPC_E1,
18 -> CodeUPC_Supp2, { UPC 2 digit supplemental }
19 -> CodeUPC_Supp5, { UPC 5 digit supplemental }
20 -> CodeEAN128A,
21 -> CodeEAN128B,
22 -> CodeEAN128C

Este procedimento pode ser aplicado a qualquer elemento gráficos de relatórios.
01/11/2008