(Resolvido) Etiquetas e impressora Allegro Pro (Datamax)

[Nei D. Lopez]

Estou com um problema curioso, ao tentar imprimir etiquetas utilizando o QuickReport e uma impressora de etiquetas/código de barras.

A impressora é uma Allegro Pro (Datamax).

O que acontece é o seguinte, eu monte um layout qualquer no QuickReport, só para testar, e coloco la dois dbdbtext, um para "Nome:" outro para "E-Mail", aí mando uma impressão normal e tals, e é impresso normalmente, com os dados do banco de dados e tudo. Mas o que acontece é o seguinte, quando mais informações (textos, label, enfim...) são colocadas no Quickrep, a impressão ainda sai, mas de um modo diferente, a impressão não sai mais continua, ela imprimi uma etiqueta, para um fração de segundo, imprime outra, para outra fração de segundo e assim por diante. Reparei isso em um sistema que temos aqui, mas não sei porque ocorre, a impressão é feita no FrmEtiquetas.QuickRep2.Print no exemplo que criei (e no sistema que utilizamos tb...).

Outra coisa que reparei é em um programa que vem com a impressora, o Seagull BarTender, a impressão sai continuamente mesmo tendo varias informações na etiqueta, o que me fez deduzir que pode ser a forma com que o quick report envia a impressão para a impressora, seila...

Algupem pode me ajudar?

[Jhonas]

a impressão é feita no FrmEtiquetas.QuickRep2.Print no exemplo que criei

Essa paradinha por uma fração de segundo pode ser em função do tamanho do papel definido

Experimente usar um QuickReport fora de um Form ... e em Paper Size use a definição Custom Size e defina exatamente o tamanho do papel usado na impressora

abraço

[Nei D. Lopez]

a impressão é feita no FrmEtiquetas.QuickRep2.Print no exemplo que criei

Essa paradinha por uma fração de segundo pode ser em função do tamanho do papel definido

Experimente usar um QuickReport fora de um Form ... e em Paper Size use a definição Custom Size e defina exatamente o tamanho do papel usado na impressora

abraço

Como assim fora do Form? Criando dinamicamente você diz? Pode me dar um exemplo pelo menos para que eu comece a fucar?

E obrigado por responder, é a primeira resposta que recebo.

[Jhonas]

Como assim fora do Form? Criando dinamicamente você diz? Pode me dar um exemplo pelo menos para que eu comece a fucar?

Como assim fora do Form? ... Pelo que eu entendi voce colocou um componente QuickReport dentro de um form, não foi ?

FrmEtiquetas.QuickRep2.Print

porque se não voce não estaria chamando desta maneira e sim somente QuickRep2.Print

Criando dinamicamente você diz? ... Não voce vai no Menu do delphi na opção File > New > e clica em Report

Voce terá um QuickReport independente do seu Form... depois nele voce monta a estrutura que deseja e modifica o tamanho do papel como lhe informei ... depois faça o teste para ver o que aconteçe.

abraço

[Nei D. Lopez]

Po será que não falta nenhum detalhe?

Fiz exatamente o que você falou e as pausas continuam... =/

Como assim fora do Form? Criando dinamicamente você diz? Pode me dar um exemplo pelo menos para que eu comece a fucar?

Como assim fora do Form? ... Pelo que eu entendi voce colocou um componente QuickReport dentro de um form, não foi ?

FrmEtiquetas.QuickRep2.Print

porque se não voce não estaria chamando desta maneira e sim somente QuickRep2.Print

Criando dinamicamente você diz? ... Não voce vai no Menu do delphi na opção File > New > e clica em Report

Voce terá um QuickReport independente do seu Form... depois nele voce monta a estrutura que deseja e modifica o tamanho do papel como lhe informei ... depois faça o teste para ver o que aconteçe.

abraço

[Jhonas]

Po será que não falta nenhum detalhe?

Fiz exatamente o que você falou e as pausas continuam... =/

Verifique em que instante ocorre a pausa ... por exemplo: quando acaba uma e começa outra, ou quando termina a ultima linha de impressão, ou quando ele lê o proximo registro ... etc

Neste caso voce deve fazer uma investigação mais detalhada ... verifique novamente os drives da impressora, cabo da impressora ...etc

experimente tambem montar uma etiqueta usando o evento OnNeedData do Quick Report ( já tem algo a respeito no forum )

Esse tipo de problema não é facíl de solucionar... ainda mais quando não se tem a impressora para testes.

abraço

[Nei D. Lopez]

Já fiz essas verificações, a única coisa realmente estranha que pude notar foi que, a impressão da essas pausas depende da quantidade de "texto" que tem na etiqueta e da posição do mesmo, por exemplo, se existe texto muito próxima da borda e etc. É realmente muito estranho, essa impressora é meio estranha, porque se existe pouca quantidade de texto na etiqueta ela imprime continuamente. Bom, mas obrigado pela ajuda, se tiver mais alguma idéia eu agradeço.

Po será que não falta nenhum detalhe?

Fiz exatamente o que você falou e as pausas continuam... =/

Verifique em que instante ocorre a pausa ... por exemplo: quando acaba uma e começa outra, ou quando termina a ultima linha de impressão, ou quando ele lê o proximo registro ... etc

Neste caso voce deve fazer uma investigação mais detalhada ... verifique novamente os drives da impressora, cabo da impressora ...etc

experimente tambem montar uma etiqueta usando o evento OnNeedData do Quick Report ( já tem algo a respeito no forum )

Esse tipo de problema não é facíl de solucionar... ainda mais quando não se tem a impressora para testes.

abraço

[Jhonas]

essas pausas depende da quantidade de "texto" que tem na etiqueta e da posição do mesmo, por exemplo, se existe texto muito próxima da borda e etc. É realmente muito estranho, essa impressora é meio estranha, porque se existe pouca quantidade de texto na etiqueta ela imprime continuamente.

Voce levantou outra questão, que está relacionada diretamente com o tamanho da fonte, ou seja, dependendo do tamanho da fonte, os caracteres podem estar fora da área imprimivel

procure trocar por uma fonte Arial tamanho 8 ou outra e faça novamente o teste

abraço

[Nei D. Lopez]

Acho que finalmente consegui resolver o problema. O seguinte acontecia:

As etiquetas ficam em um ROLO de etiquetas, então não tem lógica criar um layout, com o comprimento igual a extenção do ROLO oO, logo eu havia criado um layout do tamanho do papel de UMA etiqueta destacada, e o DetailBand preenchia o espaço dele (desconsiderando as margens), o que provavelmente causava aquelas pausas, porque a impressora imaginava ser uma "nova página" a cada etiqueta... Aí pensei, se é um ROLO, antes de imprimir (BeforePrint) vou mandar o layout crescer conforme a quantidade de registros da tabela:

qrEtiqueta.Page.Length:=qrEtiqueta.Page.Length+(39*(DM.ADOQ.RecordCount-1)); {"39" é o quanto tem que "crescer" o "papel" conforme a quantidade de registro (isso no meu caso...)

Fazendo isso funcionou...