Написать код delphi, который бы брал введенные данные и сохранял в txt файл.

Procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Text := Edit1.Text;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  f: textFile;
begin
  AssignFile(f, 'C:\Users\HRAshton\Desktop\out.txt');
  rewrite(f);
  Write(f, Memo1.Text);
  closeFile(f);
end;

Воть, приклейте эти процедуры на кнопки:)