Função iniciar a confeçção de uma nova etiqueta
procedure Abrir_Etiqueta_PPLA;

Função para finalizar a confecção de uma nova etiqueta
Function Fechar_Etiqueta_PPLA(Imprime: Boolean;
Num_Copias: integer = -1): TStrings;

Funções relativas à linguagem PPLA (utilizadas internamente na unit)
Funções Permanentes do Sistema
Function Comando_STX_K17(Modo_Impressao: byte): String;
Function Comando_STX_K18(Baudrate: byte): String;
Function Comando_STX_K1(codigo_pagina: byte): String;

Funções Temporários do Sistema
Function Comando_STX_c(comprimento_papel: integer): String;
Function Comando_STX_e: String; overload;
Function Comando_STX_E(num_copias: integer): String; overload;
Function Comando_STX_G: String;
Function Comando_STX_r: String;
Function Comando_STX_F: String; overload;
Function Comando_STX_f(tamanho_avanco: integer): String; overload;
Function Comando_STX_J(pausa: Boolean): String;
Function Comando_STX_L: String;
Function Comando_STX_M(comprimento_etiqueta: byte): String; overload;
Function Comando_STX_m: String; overload;
Function Comando_STX_n: String;
Function Comando_STX_O(posicao_inicial: integer): String;
Function Comando_STX_Q: String; overload;
Function Comando_STX_q(modulo_memoria: char): String; overload;
Function Comando_STX_S(velocidade_avanco: char): String;

Funções de Formatação de Etiqueta
Function Comando_C(margem_esquerda: integer): String;
Function Comando_D(largura_pixel, altura_pixel: byte): String;
Function Comando_E: String;
Function Comando_H(temperatura: byte): String;
Function Comando_M: String;
Function Comando_P(velocidade_impressao: char): String;
Function Comando_Q(num_copias: integer): String;
Function Comando_R(compensacao_vertical: integer): String;
Function Incrementa_Numerico(valor_inicial: integer): String;
Function Incrementa_Alfanumerico(valor_inicial: integer): String;
Function Decrementa_Numerico(valor_inicial: integer): String;
Function Decrementa_Alfanumerico(valor_inicial: integer): String;
Function Copia_Numerico(num_copias: integer): String;

Função para impressão de Texto
Function Texto_PPLA(Orientacao: integer; Fonte, Multiplicador_Horizontal,
Multiplicador_Vertical: char; Subtipo_Fonte,
Eixo_Y, Eixo_X: integer; Texto: Shortstring): String;

Função para impressão de Código de Barras
Function Codigo_Barras_PPLA(Orientacao: integer; Tipo_Codigo_Barra,
Largura_Barra_Larga, Largura_Barra_Fina: char;
Altura_Barra, Eixo_Y, Eixo_X: integer;
Codigo: shortString): String;

Função para impresssão de Linhas
Function Linhas_PPLA(Eixo_Y, Eixo_X, Largura_Linha,
Altura_Linha: integer): String;

Função para Impressão de Caixa
Function Caixa_PPLA(Eixo_Y, Eixo_X, Largura_Linha, Altura_Linha,
Grossura_Linha_Horizontal,
Grossura_Linha_Vertical: integer): String;

Função para impressãode Imagem
Function Imagem_PPLA(Eixo_Y, Eixo_X: integer;
Nome_Arquivo: Shortstring): String;

  Para recompilar o programa demo antes de adquirir o fonte da unit, é necessário copiar o arquivo PPLA_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 PPLA_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 Argox e verifiquem se a impressão é efetuada sem problemas.

  Caso a impressão de etiquetas ocorra normalmente no software da Argox 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.

  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 4.7x2.7 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 PPLA", surgiram as mensagens de "Não Registrado" e o código fonte PPLA será mostrado abaixo, clique então em "Enviar para Impressora".

  5- Caso a impressão de etiquetas ocorra normalmente no software da Argox 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 PPLA 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 PPLA_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 PPLA, no entanto o demo de uso da Unit já vem acompanhado 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 PPLA só está implementada em Delphi, e não há previsão para implementação em 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.

  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... você tem que 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.