[Dievee]

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
 assignfile(t1,'D:\testdelphi2.txt');
 reset(t1);
  a:=edit1.Text;
  b:=edit2.Text;
   writeln(t1,a);
   //writeln(t1,b);
 closefile(t1);
end;

end.

Программа должна записать строку которая написана в edit1 но вот возникают такие ошибки , в чем проблема? За таким путем есть такой файл несколько раз проверил.