Fórum Impressão Cheque LX-300 #401348

Configure o tamnho de 4 cheques. A Lx300 possui este tamanho na sua lista. Assim ficará exato.

.   Como assim?   Como poderia configurar para 4 cheques?

. .   Poderia me dar uma dica de como fazer isso? Não entendí muito bem.

Uma outra dica, seria mudar mesmo o componente, para o ZReport que é específico para impressões não gráficas, pois o QR, permite que você imprima qualquer tipo de fontes, gráficos, etc... mas o ZReport é próprio para impressões rápidas e caracteres não gráticos.

oi vc consegui resolver o seu problema da impressão do cheque?

Até o momento não

estou usando esse codigo mais a medida q a pagina vai subindo ele desalinha.

try
qtd := 1;{StrToInt(InputBox(Emitir Carnê,Qtd,)); }
data := StrToDate(01/10/2013);{StrToDate(InputBox(Emitir Carnê,Vencimento,)); }
pr := qtd;

AssignFile(F,LPT1);
Rewrite(F);
for i := 0 to Pred(qtd) do
begin
Writeln(F,#27#15);
//Valor parte superior
Writeln(F, +FormatFloat(###,###,##0.00,dsCheque_Emitir.DataSet.FieldByName(valor).AsFloat));
Writeln(F,IPula);
//Valor extenso
Writeln(F,IDuploC+ +TFuncao.valorPorExtenso(dsCheque_Emitir.DataSet.FieldByName(valor).AsFloat));
// Writeln(F,#27#15);
//NOME ENDERECO
// Writeln(F,IPula);
Writeln(F,IPula);
Writeln(F,IDuploC+ X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X );
Writeln(F,IDuploC+ +dsCheque_Emitir.DataSet.FieldByName(nominal_a).asString);
// Writeln(F,IPula);
Writeln(F, + CARUARU+ +18+ +ABRIL+ +13);

Writeln(F,IPula);
Writeln(F,IPula);
Writeln(F,IPula);
Writeln(F,IPula);
Writeln(F,IPula);
Writeln(F,IPula);

Writeln(F,IPula);
end;
CloseFile(F);
Except on e:exception do
ShowMessage(e.Message);

end;