Impressão Em Diversas Inpressoras

[Diabloline]

No programa que fiz criei um sistema de impressão de forms mas ele não está imprimindo numa impressora HP 840, não sei porque pois testei em HP 660, HP 656 c e outras e imprimiu normalmente, gostaria de saber algum jeito para que ele imprimice em qualquer impressora.

Valeu

Raul Brandão (Diabloline)

[Diabloline]

Cade os Moderadores???????????

Valeu Galera

[Diabloline]

Na impressora HP 656 c HP 660 funcionou normalmente já na HP 840, não imprime puxa a folha e depois não sai nada fica em branco, no sistema de impressão da para escolher qual impressora, funciona n rede mas nessa impressora, alguém sabe de alguma coisa, poxa se ninguém souber escreva aqui não sei, pelo menos sei que vocês viram.

Valeu

[Diabloline]

Alguém sabe como imprimir em qualquer impressora.

Cade os Moderadores

[Arlon]

Cade os Moderadores

Amigo, eu não sei responder a sua dúvida, mas tenho uma observação a fazer:

Moderadores não são deuses que sabem tudo, se alguém até agora não respondeu a sua dúvida é porque ninguém encontrou uma solução pra ela ainda.

Os moderadores foram as pessoas escolhidas para organizar as seções e não sair respondendo o que sabem e o que não sabem; portanto, tenha um pouco de paciência, procure em outros sites, enfim, espere um pouco pra ver se a solução aparece.

[Capablanca]

Cade os Moderadores???????????

Valeu Galera

E tem mais: a única função do Moderador é MODERAR.

MODERAR, segundo o Aurélio, significa REGRAR, REGULAR, REFREAR, TORNAR MENOS TENSO, ETC.

O moderador exerce uma função ADMINISTRATIVA e não CONSULTIVA... Quando um moderador responde uma questão, ele não a responde na qualidade de moderador, mas de MEMBRO do fórum.

Portanto amigo, nada de EXIGÊNCIAS.

Quanto a sua questão em si, não sei responder.

[Arlon]

Por exemplo, se você quizer imprimir uma nota fiscal feita emum RichEdit, pode fazer o seguinte: coloque um componente PrintDialog (paleta Dialog), e no botão "Imprimir" coloque isso:

if PrintDialog1.Execute then

begin

RichEdit1.Print('Nota Fiscal');

end;

[Diabloline]

Alguém será que pode me ajudar.

Sei que o tema não é facil pois não entendo porque isso é possivel não imprimir numa impressora especifica, mas se alguém puder me ajudar valeu.

Os moderadores são nossos pontos de referencia pois eles cuidam da poarte admistrativa e já possuem ou deveriam possuir um pouco mais de experiencias que os novatos.

Valeu Galera

[Corposemalma]

Seria legal se voce especificasse como esta imprimindo...

Pelo driver? Direto em porta?

Que sistema operacional?

Talvez com isso eu não posso te ajudar.. mas facilida os outros usuarios...

[Guest Guest]

desculpa olha o codigo

procedure TfrmMenu.ImprimirClick(Sender: TObject);

begin

if dlImprime.Execute then

PrintForm(TForm(TButton(Sender).Owner));

end;

procedure TfrmMenu.PrintForm(frmMenu: TForm);

var

bmp: TBitMap;

x, y, WDPI, HDPI: Integer;

OldColor: TColor;

begin

Screen.Cursor := crHourGlass;

OldColor := frmMenu.Color;

frmMenu.Color := clWhite;

frmMenu.Update;

bmp := frmMenu.GetFormImage;

with Printer do

begin

Orientation := poLandscape;

BeginDoc;

HDPI := PageHeight div 8;

WDPI := PageWidth div 8;

x := PageWidth - Round(WDPI * 0.4); {0.4" margem direita}

y := PageHeight - Round(HDPI * 0.5); {0.5" Altura do rodapé}

Canvas.StretchDraw(Rect(0, 0, x, y), bmp);

EndDoc;

end;

bmp.Free;

frmMenu.Color := OldColor;

Screen.Cursor := crDefault;

end;

[s3c]

Desculpe se vou escrever alguma besteira, mas você disse que imprime em várias impressoras e só em uma que não sai a impressão, certo?

você já testou nessa impressora que não imprime se ela imprime corretamente sem ser pelo seu sistema?

[Guest - Diabloline -]

Sim ela imprime qualquer documento do Word, Excel e outros mesnos desse jeito mais não é só uma impressora é duas só que é o mesmo modelo HP 840, entenderam.

Então não é a impressora é o modelo.

Diabloline

[Diabloline]

O papel é puxado nessa impressora normalmente como estivesse começando a impressão e depois ele sai em branco, não imprime nada.

[s3c]

O que pode ser é dela estar recebendo um caracter de controle.

Experimente mandar um texto simples.

[Diabloline]

Ela imprime um texto por exemplo do word, vou tentar agora de um programa que fiz mas o seguinte acho que por estar tentando imprimir o form que ela não está aceitando.

[Diabloline]

ele imprime um programa simples de texto que fiz mas não imprime o form que é o que estou usando nesse programa

[Guest --mauricio --]

MEU AMIGO . ACHO QUE SUA INP/ ESTA COM BAIXA MEMORIA?

[Guest Visitante]

ele imprime um programa simples de texto que fiz mas não imprime o form que é o que estou usando nesse programa

Informações sobre memória da HP 840

Descrição Especificação

RAM interna 2 MB

Buffer de recepção 48 KB

Obs: voce esta tentando imprimir o form ( que pode variar de 1.4Mb a 3Mb dependo dos componentes que compõe o form)

Neste caso se a impressão ultrapassar os 2MB da RAM não vai imprimir nada .... valeu ?

deixe a impressora em off line e mande imprimir ... depois verifique qual o tamanho do arquivo que foi enviado para a impressora.

[Felipee]

já tentou gerar o form em grafico e fazer com que o quickreport leia esta imagem depois?

com o quickrep as impressao não jogadas todas de uma vez para a impressora, ele vao jogando aos poucos conforme sua capacidade.

acho esta forma poderá resolver seu problema.

espero ter ajudado.

felipee.