Помогите написать код 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;Воть, приклейте эти процедуры на кнопки:)