Newbie sucht Hilfe mit NotePadClon

[Gurkendieb]

im rich format,
wie lautet da denn der Befehl für Datei speichern??
Das von TMemo funzt net:

procedure TForm1.Speichern1Click( Sender: TObject);
begin
if SaveDialog1.Execute then
RichEdit1.Lines.SaveToFile( SaveDialog1.FileName);
end;