Não consigo imprimir em mini impressoras no delphi XE2

Automação Comercial

08/08/2013

O problema é o seguinte, tenho que imprimir orçamento em modelo cupom,será que posso usar a impressora padrão e controlar a posiçao dos caracter a ser imprimido?
a impressora está na usb, sistema operacional w7,.
Alguem pode me ajudar?
Engeberto Saraiva

Engeberto Saraiva

Curtidas 0

Respostas

Mauricio Rodrigues

Mauricio Rodrigues

08/08/2013

Usa impressão direta como exemplo
AssignFile(F, Porta);
Rewrite(F);

WriteLn(F, trim(Cabecalho.Text));
// WriteLn(F,'Vendedor '+FrmFimVenda.Label6.Caption);
WriteLn(F, StringOfChar('-', 40));
WriteLn(F, DateToStr(Date) + ' ' + TimeToStr(Time));
WriteLn(F, 'Pedido nº' + ' ' + IdCupum);
WriteLn(F, '----------------------------------------');

CloseFile(f);

obs:
porta - coloca onde está conectado a impressora.
para criar um padrão de colunas eu uso o comando
StringOfChar(' ', 30 - Length(descricao))+' ' vai preencher com espaço em branco quando sobrar espaço na descrição do produto.
exemplo
descrição valor
Kit churasco 50,00
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 80,00
GOSTEI 0
Deivison Melo

Deivison Melo

08/08/2013

Além do código informado pelo amigo que está perfeito por usar componentes nativos do delphi, recomendo o uso de ferramentas para confecção de relatórios matriciais sejam eles pagos ou free (dependendo da sua real necessidade).

Teríamos alguns legais como:

RDPrint (Pago, mas muito bom, tendo a opcão de preview (visualização), VDOPrinter (muito bom, e free), FortesReports(Ferramenta para confecção de relatório (hoje muito utilizada por sua alta qualidade) desenvolvida por nossos amigos Cearenses...

Existem muitas ferramentas e também muita idéia boa e código validado por aí...

Dá uma pesquisada aqui no site da devmedia e também no site Torry...

www.torry.net (repositório de componentes)

E ainda:


DelphiFans

www.delphifans.com

Abração e bons códigos!!

Qualquer coisa estou à disposição!

GOSTEI 0
Engeberto Saraiva

Engeberto Saraiva

08/08/2013

Certo, assim que testar retornarei.
Estou imprimindo atualmente no memo, mas preciso de uma solução melhor do que o memo.

Obrigado!
GOSTEI 0
Marcos Cruz

Marcos Cruz

08/08/2013

vcs conseguiram eniviar par auma mini impressora ? pelo delçhi android
GOSTEI 0
POSTAR