Ver Mensaje Individual
  #2  
Antiguo 30-04-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.964
Reputación: 29
delphi.com.ar Va camino a la fama
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!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita