Saving textfiles in Memo and using SaveDialog

I am a real newbie to Delphi. I am building a word processor for a senior
project but I cannot seem to get any sample code to show me what I should
write in the procedure TTextViewer.SaveAs1Click(Sender: Tobject). By the
way, TTextViewer is of class(TForm). Please email or cc: responses to Also I can't seem to find any sample code in Delphi's
Online help. I resorting to getting sample code of the Internet to show me
what to do. This is so different from Pascal for the code portion that I
kind of lost. Oh well.

procedure TTextViewer.SaveAs1Click(Sender: TObject);
  If SaveDialog1.Execute Then