Savedialog

[Natcree]

Ich möchte ein form mit info´s öffnen und diese speichern. nunmehr soll nach dem speichern die form geschlossen werden.

ich mache das speicher mit einem savedialog nach dem speichern meckert er aber

Hier mal der code

Delphi-Quellcode:

procedure TForm15.Button4Click(Sender: TObject);
var
st:tstringlist;
begin
st:=tstringlist.Create;
st.AddStrings(memo1.Lines);
if SaveDialog1.Execute then
st.SaveToFile(SaveDialog1.FileName+'.sta');
st.free;
close;
end;

er sagt mir es geht nicht mit einem on hide or no visible form