 |
ActiveDelphi
.: O site do programador Delphi! :.
|
| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
josafags
Novato
Registrado: Sexta-Feira, 20 de Outubro de 2006
Mensagens: 55
|
 Enviada: Qua Ago 31, 2011 1:38 pm Assunto: Imprerssao Via TPrint ou LPT1 |
 |
|
| Moderadores do Active-Delphi escreveu: |
Tópico editado por: johnny-walker
Motivo: Regras do fórum
Título Original: IMPRESSAO VIA TPRINT OU LPT1 |
Boa tarde
Amigos estou com problema na impressão de uma comanda.
fiz um soft. para uma lanchonete onde é preciso imprimir em comanda em uma lx300 mas não consigo alinha a comanda. via lpt1 onde posso dominar o tamanho do papel, ja pelo tprint consigo alinhar mas ao terminar pula como se fosse uma folha a4. mas estou imprimindo em uma bobina.
preciso que saia assim
cliente: tabclientenome
end: tabclienteend
_______________________
prod | quant | valor
xegg..........1..............R$:2,00
xcalabresa..1.............R$:3,00
moda.........1..............R$:2,00
carne de sol.1.............R$:3,00
e ta saindo assim assim
cliente: tabclientenome
end: tabclienteend
_______________________
prod | quant | valor
xegg......1......R$:2,00
xcalabresa......1......R$:3,00
moda......1......R$:2,00
carne de sol......1......R$:3,00
favor desconsidere os pontos..
se alguem souber como alinho e controlo a saida do papel serei muito grato. |
|
| Voltar ao Topo |
|
 |
imex
Moderador
Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666
|
| Enviada: Qua Ago 31, 2011 2:41 pm Assunto: |
|
|
Boa tarde
Se você está imprimindo em modo texto (TextFile), pode utilizar a função Format para alinhar as colunas a esquerda ou a direita. Ex:
| Código: | Writeln(F, Format('%-15.15s', ['xegg']) +
Format('%5.5s', [IntToStr(1)]) +
Format('%12.12s', [Format('%m', [2])]));
Writeln(F, Format('%-15.15s', [xcalabresa']) +
Format('%5.5s', [IntToStr(1)]) +
Format('%12.12s', [Format('%m', [3])])); |
Espero que seja útil.
Editado pela última vez por imex em Ter Out 17, 2023 12:28 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
|
daverson
Aprendiz
Registrado: Quarta-Feira, 24 de Março de 2010
Mensagens: 199
|
| Enviada: Qui Set 01, 2011 10:20 pm Assunto: |
|
|
para epson lx 300, eu prescisei criar um formulario no tamanho do papel usado, especifico para o programa que o cliente estava usando, no caso meia carta, ou seja papel carta picotado...
para isso em impressoras e aparelhos de fa (windows XP) clique com botao direito, acesse o menu propriedades do servidor e crie seu formulario no tamanho desejado, consegui resolver assim, pois nao fui eu quem fiz o sistema... |
|
| Voltar ao Topo |
|
|
josafags
Novato
Registrado: Sexta-Feira, 20 de Outubro de 2006
Mensagens: 55
|
| Enviada: Seg Set 05, 2011 9:56 am Assunto: agradecimentos |
|
|
muito obrigado
os codigos funcionaram perfeitos. |
|
| Voltar ao Topo |
|
|
johnny-walker
Moderador
Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL
|
| Enviada: Seg Set 05, 2011 10:33 am Assunto: |
|
|
Vc também pode imprimir de forma milimétrica com o objeto tprinter, até aqui no site tem alguns exemplos, alguns eu postei.
bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I |
|
| Voltar ao Topo |
|
|
|
|
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
