Pesquisar na Comunidade
Showing results for tags 'tlp2844'.
Encontrado 1 registro
-
Pessoal estou usando o ACBRETQ para imprimir na GC420t normalmente, mas quando fui testar o mesmo codigo na TLP2844 a impressora apenas pisca o led uma vez e não imprimi a etiqueta. Existe alguma diferença de configuração de uma impressora pra outra ??? Config da GC420t que estou usando: DPI := dpi203; Modelo := etqZPLII; Temperatura := 30; Velocidade := -1; BackFeed := bfNone; Unidade := etqMilimetros; para imprimir: ImprimirTexto(orNormal, '0', 60, 60, 3, 3, Copy(EdtDescCupom.Text,1,27), 0, True); ImprimirTexto(orNormal, '0', 50, 50, 10, 3, Copy(EdtDescCupom.Text,28,27)); ImprimirBarras(orNormal, barEAN13, 2, 2, 16, 5, EdtCodBarra.text, 8, becSIM); ImprimirTexto(orNormal, '0', 100, 100, 16, 32, 'R$'); if CheckBox2.Checked then begin if StrToFloat(EdtPromocao.Text) = 0 then ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtValor.Text))) else ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtPromocao.Text))); end else begin if StrToFloat(EdtNatural.Text) <> 0 then ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtNatural.Text))) else ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtValor.Text))); Imprimir(StrToInt(EdtQtdEtq.Text), StrToInt('0')); Aguardo ajuda....
