archivo de texto

[delphi.com.ar]

Puedes utilizar el programa asociado para imprimir este texto, con el siguiente código:

Código Delphi [-]
uses
  ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle, 'print', 'c:\texto.txt', nil, nil, SW_SHOW);
end;

O puedes ir a algo mas antiguo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  WinExec('c:\texto.txt > LPT1', SW_SHOW);
end;

O bien puedes abrir el archivo, y cargarlo en un reporte.

Saludos!