Como creo, inserto y leo un txt desde delphi?

[danytorres]

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?