Ver Mensaje Individual
  #4  
Antiguo 27-05-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.932
Reputación: 27
delphi.com.ar Va por buen camino
Te comento que TU codigo escribe y lee lo mismo del archivo:
Código Delphi [-]
procedure TForm1.btnSaveClick(Sender: TObject);
var
  F: TextFile;
begin
  AssignFile(F, 'C:\PRUEBA.TXT');
  ReWrite(F);
  WriteLn(F, Edit1.Text);
  CloseFile(F);
end;

procedure TForm1.btnLoadClick(Sender: TObject);
var
  F: TextFile;
  S: string;
begin
  AssignFile(F, 'C:\PRUEBA.TXT');
  Reset(F);
  Readln(F, S);
  Edit2.Text := S;
  CloseFile(F);
end;

¿Necesitas leer el archivo con un programa externo?
__________________
delphi.com.ar

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