[ecfisa]

Hola BetoAlonso.

Supongo que te estas refiriendo a una impresora matricial trabajando en copias con carbónico. Si es así, tenes que aplicarle al texto el estilo Double-Strike. Los comandos para hacerlo dependen de cada marca y modelo de impresora y que, como no lo especificaste, lógicamente desconocemos.


Como ejemplo para una Epson ESC/P2, uno de los estándares de facto en impresoras matriciales, sería:

Código Delphi [-]
var
  prn: Text;
begin
  Assign(prn, 'LPT1:');
  Rewrite(prn);
  ...
  Write(prn, #27#71); // selecciona modo "doble pasada"
  WriteLn(prn, 'Texto en Double-Strike');
  Write(prn, #27#72); // cancela modo "doble pasada"
  ...
  Close(prn);

Saludos.