Erro ao imprimir para uma porta série

Olá

Pretendo imprimir para uma impressora sério(Epson tmt88!!) que esta conectada a COM1, com este velho pedaço de código.

F : TextFile;
i : integer;
begin
AssignFile(F,´COM1´);
Rewrite(F);
Writeln(F,´Teste de impressao - Linha 0´);
CloseFile(F);
end;

Acontece que da erro no spooler.

Conhecem outra anternativa para imprimir numa impressora
sésie.



[]