Daniel, bom dia!

Você já tentou configurar o tamanho do formulário de boleto em 
propriedades da impressora, direto no Windows. Tenta utilizar um 
modelo que você possa informar as medidas do formulario.
Para mim, esta foi a solução deste mesmo problema.

Abraços.

José de Moura

--- Em delphi-br@yahoogrupos.com.br, Daniel Bastos <[EMAIL PROTECTED]> 
escreveu
> Salve galera, to com um problema na impressão aqui. Se alguem 
puder me
> ajudar, vai me tirar uma dor de cabeça daquelas
> 
> Quando uso impressão com TPrinter, é uma rotina de impressão de 
boletos. Ele
> só imprime até o terceiro boleto em qualquer impressora.
> 
> Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os 
boletos
> saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado)  
sai
> corretamente. Desta forma soube que não era problema nem da rotina 
de
> impressão, na qual gera o arquivo corretamente, nem do driver ou 
do Sistema
> operacional, pois imprime corretamenete.
> 
> Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o
> resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 
boletos são
> exatamente o tamanho de uma página A4. Não sei se estes fatos tem 
relação.
> 
> Alem destes, fiz muitos testes aqui. E no geral, não consigo 
imprimir no
> Delphi usando TPrinter(Com geradores de relatório como por exemplo 
o
> QuickReport, funciona perfeitamente) mais de 3 boletos se eu não 
der um
> "NewPage". O Caso é que, se eu der um NewPage, ele vai pular o 
tamanho de
> uma página, consequentemente, pular 3 boletos e imprimir errado.
> 
> o incrível é que nem uma impressão simples como a no código abaixo 
fuinciona
> 
> var
>   ct : integer;
> begin
>   printer.BeginDoc;
>   for ct := 0 to 1000 do
>     printer.Canvas.TextOut(50, 50*ct, IntToStr(ct));
>   printer.EndDoc;
> 
> este código só imprime até um determinado número dependendo da 
resolução da
> impressora, mas sempre no tamanho de 1 página a4.
> 
> 
> O mais incrível, é que a mesma rotina funcionava a alguns dias 
atraz.
> 
> alguem tem alguma idéia.
> 
> Abraços a todos
> 
> Daniel A. Bastos
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]




-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a