Öffnen und Speichern

mmhh... habe gerade mal testweise was Kleines geschrieben und da geht es. Sieht so aus als ob der trotzdem die Datei öffnen bzw. speichern wollte, obwohl kein Name angegeben ist.

Steht alles was nach dem Öffnen bzw. Speichern passieren soll hinter einem
if OpenDialog1.Execute then bzw. if SaveDialog1. Execute then Damit sollte er nämlich nach dem Abbrechen nicht in die weiteren Anweisungen gehen...
 
beim öffnen steht wo er den geöffneten text anzeigen soll. Beim speichern allerdings steht nur

procedure TForm1.SpeichernUnter1Click(Sender: TObject);

begin

if FileSaveAs1.Execute then
Memo1.Lines.SaveToFile(FileSaveAs1.Dialog.FileName);

end;

aber es kommt trotzdem die meldung
 
Zurück