Bom, eu tentei configurar a página pra menor (tamanho do boleto) e para
maior (maior que uma folha normal)mas não houve mudança.
Testei em vários computadores e tipos de impressoras diferentes (Apesar que
esta rotina só funcionará em um tipo de impressora).
Os boletos são pré-impressos, não sei se deu pra pescar na msg anterior,
esqueci de escrever isso antes, foi mal...
Obrigado pelo toque, mas infelismente não deu certo. :(
Continuo na mesma.... se alguem tiver alguma outra idéia e puder me
ajudar....
Daniel A. Bastos
Em 07/12/05, jmourajr2000 <[EMAIL PROTECTED]> escreveu:
>
> 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 >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
[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
