Impressão de Etiquetas

[Tomaz Edson Linhares]

Olá amigos, preciso de ajuda. Baixei através da opção de downloads um fonte para imprimir etiquetas. Essa rotina imprimi 05 etiquetas por linha até o final do meu arquivo. Quando o arquivo termina ela ejeta a folha das etiquetas. Eu preciso que ao terminar a impressão ela não ejete a folha. Eu adaptei para ela imprimir, por exemplo, 15 códigos de barras de um mesmo produto, ou seja ela imprimirá 3 linhas de etiquetas, isso ela faz, só que ela ejeta a folha. Eu quero que ela pare(se posicione) na próxima linha de etiqueta para eu imprimi outros códigos. Tenho o palpite que tenho que definir o tamanho da página pelo tamanho da etiqueta, mas não sei como.

o código está assim : (não alterei)

* altura e largura do codigo de barras
nCodeHeight := 6
nModuleWidth := 0.33

// left margin
nOffset := 7
nBeginRow := 10
nEndRow := nBeginRow + nCodeHeight

cPreparedEAN13 := MOL_ean13(cKodEAN13)

SELECT PRINTER DEFAULT PREVIEW ;
ORIENTATION PRINTER_ORIENT_PORTRAIT ;
PAPERSIZE PRINTER_PAPER_A4 ;
QUALITY PRINTER_RES_MEDIUM

START PRINTDOC name ' Etiquetas de Produtos com Codigo de Barras '
START PRINTPAGE

.....
END PRINTPAGE
END PRINTDOC
return

[Mario Mesquita]

Boa noite.

Tomaz, acho que o problema é o formulário especificado. Também estou correndo atrás dessas especificações pois terei que imprimir etiquetas com QR-Code.

Pelo que li, vc tem que definir o formulário como definido pelo usuário e definir altura e largura.

Mas é claro que aproveito e peço ajuda aos colegas pois também estou engatinhado, as etiquetas que fiz foram para impressora matricial e ainda usando o velho @ SAY. Agora pretendo usar a MiniPrint com o @ PRINT.

Saudações,
Mario.

[Tomaz Edson Linhares]

Bom Dia Mario. Obrigado por responder.

Estou engatinhando nessa linguagem.

Vocês tem algum exemplo de como definir pelo usuário?

Um pequeno exemplo de impressão já me ajudará muito.

Fiz umas configurações mas não deu certo.

[Mario Mesquita]

Olá, Tomaz.

Eu também estou engatinhando mas consegui essa configuração, que deve ser ajustada de acordo com o tamanho da sua etiqueta:

Código: Selecionar todos

SELECT PRINTER DEFAULT PAPERSIZE PRINTER_PAPER_USER PAPERLENGTH 40 PAPERWIDTH 110 PREVIEW

O preview ajuda a visualizar a impressão. Nos meus testes eu gravo em PDF para avaliar como ficou. As medidas são em milímetros.

Sds,
Mario.