Öffnen und Speichern

[Golfkilla]

Was kommt denn für eine Fehlermeldung?

 

[W-Stefan]

Zuerst die eine und nachdem ich dann auf weiter drücke, die andere

 

[Golfkilla]

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...

 

[W-Stefan]

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

 

[Golfkilla]

Änder mal auf if FileSaveAs1.Execute = true then ...

 

[W-Stefan]

Dann kommt genau das gleiche

 

[Golfkilla]

Wenn du magst schick mir mal den Quellcode per PN, bin sonst im Moment auch erstmal ratlos.