Função para impressão direta em LPT1 (utilizada internamente na unit) Procedure Impressao_Paralela(Texto: String);

Função iniciar a confeçção de uma nova etiqueta
Procedure Abrir_Etiqueta_ZPL2;

Função para finalizar a confecção de uma nova etiqueta
Function Fechar_Etiqueta_ZPL2(imprimir: boolean; quantidade: integer = -1): TStrings;

Função para configuração de parâmetros de impressão da etiqueta
Procedure Config_Etiqueta_ZPL2(margem_erquerda, margem_superior, intensidade, velocidade: integer; min_espessura_barra: integer = 2; max_espessura_barra: integer = 2; altura_barra: integer = 10);

Função para impressão de Texto na etiqueta
Procedure Texto_ZPL2(margem_erquerda, margem_superior: integer; texto: string; inverter_cores: boolean = False; orientacao: string = 'N'; tipo_fonte: string = 'A'; altura_fonte: integer = 15; largura_fonte: integer = 15);

Função para impressão de Código de Barra na etiqueta
Procedure Codigo_Barras_ZPL2(margem_erquerda, margem_superior: integer;
tipo_codigo: string; codigo: string; inverter_cores: boolean = False; orientacao: string = 'N');

Função para geração de Quadrilátero na etiqueta
Procedure Quadrilatero_ZPL2(margem_erquerda, margem_superior, largura, altura: integer; arredondamento_borda:integer = 0; espessura: integer = 1; cor_linha: string = 'B');

Função para geração de Círculo na etiqueta
Procedure Circulo_ZPL2(margem_erquerda, margem_superior: integer; diametro: integer = 3; espessura: integer = 1; cor_linha: string = 'B');

Função para geração de Linha Diagonal na etiqueta
Procedure Diagonal_ZPL2(margem_erquerda, margem_superior, largura, altura: integer; orientacao: string = 'R'; espessura: integer = 1; cor_linha: string = 'B');

Função para geração de Elíspe na etiqueta
Procedure Elipse_ZPL2(margem_erquerda, margem_superior, largura, altura: integer; espessura: integer = 1; cor_linha: string = 'B');

Funções relativas à linguagem ZPL2 (utilizadas internamente na unit) Function Comando_XA: String;
Function Comando_XZ: String;
Function Comando_LH(x, y: String): String;
Function Comando_A(f, o, h, w: String): String;
Function Comando_B(g, o: String): String;
Function Comando_BY(w, r, h: String): String;
Function Comando_FD(a: String): String;
Function Comando_FO(x, y: String): String;
Function Comando_FR: String;
Function Comando_FS: String;
Function Comando_PQ(q: String): String;
Function Comando_PR(p: String): String;
Function Comando_PH: String;
Function Comando_PP: String;
Function Comando_PS: String;
Function Comando_SD(n: String): String;
Function Comando_MD(a: String): String;
Function Comando_GB(w, h, t, c, r: String): String;
Function Comando_GC(d, t, c: String): String;
Function Comando_GD(w, h, t, c, o: String): String;
Function Comando_GE(w, h, t, c: String): String;

  Para recompilar o programa demo antes de adquirir o fonte da unit, é necessário copiar o arquivo ZPL2_Unit.dcu para o diretório Lib de instalação do Delphi, no caso do Delphi 6 pro exemplo:
C:\Arquivos de programas\Borland\Delphi6\Lib

  Caso já tenha adquirido a ZPL2_Unit registrada, você pode adiciona-la ao seu projeto, clicando em Menu> Project> Add to Project.

  Antes de efetuar os testes com o demo de comunicação, sugerimos aos nossos usuário que instalem o software de geração de etiquetas da própria zebra e verifiquem se a impressão é efetuada sem problemas.

  Caso a impressão de etiquetas ocorra normalmente no software da Zebra e o demo não esteja funcionando, verifique se a está utilizando o demo da linguagem correta para a sua impressora.

  O demo disponível no site é totalmente funcional, sua única limitação é que a cada chamada das funções de impressão ele gera uma mensagem de "Não
Registrado".

  Para identificar o problema pelo qual não está imprimindo, favor verificar alguns pontos:

  1- A impressora deve estar corretamente instalada através do CD de drivers que acompanha a mesma e deve também está configurada como impressora padrão na porta LPT1.
obs: Efetuamos testes onde a impressora instalada padrão do Windows era uma impressora matricial Epson LX300, e a impressão também ocorreu corretamente.

  2- Verifique as configurações da etiqueta no software, como tamanho, espaço entre etiquetas e posicionamento do textos e códigos de barras. O demo foi configurado para impressão em etiquetas 10x9 cm e caso esteja testando em um padrão diferente, será necessário efetuar as correções no software e só então enviar para impressora.

  3- Verifique se a impressora está ok e pronta para imprimir e se a mesma está recebendo os comandos enviados pelo software (geralmente o led da impressora pisca ao receber os comandos)

  4- Para efetuar a impressão, adicione um produto na listagem e clique no botão "Gerar Fonte ZPL2", surgiram as mensagens de "Não Registrado" e o código fonte ZPL2 será mostrado abaixo, clique então em "Enviar para Impressora".

  5- Caso a impressão de etiquetas ocorra normalmente no software da Zebra e o demo não esteja funcionando, verifique se a está utilizando o demo da linguagem correta para a sua impressora. Pois se uma impressora que trabalha com linguagem EPL recebe parâmetros da linguagem ZPL por exemplo, a impressão não é efetuada e não haverá nenhuma indicação de erro.

  O código da ZPL_Unit.pas foi desenvolvido em Delphi 6 e é totalmente composto por código nativo do Delphi, podendo portanto ser compilado em qualquer versão do Delphi sem maiores complicações, devido a garantias de interoperabilidade entre versões fornecidas pela própria Borland.

  O objetivo maior da Unit é gerar o script da linguagem ZPL, no entanto a unit já vem acompanhada da implementação de envio direto para a porta paralela LPT1, utilizada por nossos clientes.

  A implementação do envio para a porta serial COM pode ser feita utilizando qualquer componente de comunicação serial disponivel na internet, simplesmente, enviando a string gerada pela a unit para a porta.

  Aqui na empresa costumamos utilizar o componente TCommPort (freeware) para comunicação serial diversas, mas a comunicação pode ser feita com qualquer componente de sua escolha.

  No momento o código para geração de script ZPL2 só está implementada em Delphi, e não há previsão para implementação outras linguagens.

  Porém, como comercializamos os fontes do produto, o processo de adaptação do mesmo para a linguagem desejada é simples, pois toda a lógica já está implementada e é necessária apenas a tradução. Sendo assim, sugerimos que adquira os fontes em Delphi e faça a adaptação para VB pois será muito mais rápido do que caso deseje fazer a implementação do zero.

  Isso depende do tamanho da etiqueta e do espaço entre etiquetas que vc está utilizando ai. O demo foi pre-configurado para impressão de etiquetas 9 x 10 cm.

  Mas todos estes parametros de tamanho e posicao da etiqueta são configuráveis também pela unit, e a adaptação do demo depende apenas da obeservação das dimensões da etiqueta e posições de onde deseja imprimir os textos.

  Este processo inicial é um pouco empírico mesmo... vc tem q estimar mais ou menos onde deseja que o texto seja impresso e manda imprimir para ver onde ficou... depois vai fazendo o ajuste fino.

  Em nosso sistema, que utiliza a unit, disponibilizamos uma tela para o usuário final onde ele pode fazer este ajuste fino ele mesmo, caso deseje por exemplo alterar um campo de lugar na etiqueta.