Olá!
Eu uso assim para imprimir numas impressoras não fiscais com porta paralela. AssignFile ( Imp, 'LPT1' ); ReWrite ( Imp ); WriteLn ( Imp, conInicializa ); E o cliente comprou mais impressoras e embucharam para ele com porta serial em vez de porta paralela. Poderiam me dar dicas de como imprimir em serial? Cheguei a tentar isso aqui AssignFile ( Imp, 'COM1' ); Mas assim imprime várias linhas com "Ç" Usando Delphi 7 Obrigado [As partes desta mensagem que não continham texto foram removidas]