Ver Mensaje Individual
  #3  
Antiguo 28-11-2003
danytorres danytorres is offline
Miembro
 
Registrado: may 2003
Ubicación: Venezuela. Edo Carabobo
Posts: 361
Reputación: 24
danytorres Va por buen camino
Post

gracias por responder. Para leer un txt uso el siguiente codigo;


Code:
______________________________________
procedure TConfiguracion.Button1Click(Sender: TObject);
Var
F1: TextFile;
Ch: string;
begin

AssignFile(F1, 'c:\text.txt');

Reset(F1);

Readln(F1, ch);

Edit1.Text:=leftstr(ch,5);

CloseFile(F1);
end;
_________________________________________

mi pregunta como hago para crear el text.txt y para escribir dentro del text.txt?

Responder Con Cita