 |
ActiveDelphi
.: O site do programador Delphi! :.
|
| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
fraddinho3
Novato
Registrado: Sábado, 28 de Junho de 2008
Mensagens: 3
|
 Enviada: Sáb Jun 28, 2008 10:01 pm Assunto: Impressora fiscal |
 |
|
 Gente, eu tenho uma impressora 40 colunas Generic / Text estou desenvolvendo um programa para cadastrar meus clientes e gerar ordem de serviço.
Queria imprimir assim como mostra abaixo tudo que esta negrito e varivel
e "+" são espaço so para ter uma ideia de localização
tava usando PHP para gerar um arquivo print.txt e executava o comando
Prompt DOS
TYPE print.txt > 192.168.24.23/impressora
NOME DA EMPRESA+++++++++(11)6499-6499
99.999.999/0001-99
=================================
ODEM DE SERVIÇO: 0001+++++05/08/2008
JOÃO DA SILVA
TEL.: 9999-9999 / 9999-9999
END. : RUA SEM SAIDA, 10
ATENDENTE.: MARIA
DEFEITO.:
BLA, BLA, BLA, BLA, BLA, BLA,
BLA, BLA, BLA, BLA,
BLA
==================================
GRATO VOLTE SEMPRE
Editado pela última vez por fraddinho3 em Seg Jun 30, 2008 2:45 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
joemil
Moderador
Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9100
Localização: Sinop-MT
|
| Enviada: Seg Jun 30, 2008 12:49 pm Assunto: |
|
|
vc pode usar writeln:
| Código: | procedure ...
var Arq: TextFile;
begin
AssignFile(Arq,'impressora');
ReWrite(Arq);
WriteLn(Arq, 'seu texto aqui');
WriteLn(Arq, 'seu texto aqui');
WriteLn(Arq, 'seu texto aqui');
WriteLn(Arq, 'seu texto aqui');
WriteLn(Arq, 'seu texto aqui');
CloseFile(Arq);
end; |
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/ |
|
| 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
