Morgen,
hat zwar nix mit dem eigentlichen Problem zu tun, aber:
Delphi-Quellcode:
procedure speichern_text(savedialog1:Tsavedialog;sd_hoehe,sd_laenge:array of integer;sd_takt,sd_v,sd_ende:integer);
var sd_schnitt:Textfile;
sd:integer;
begin
if saveDialog1.execute then begin
assignfile(sd_schnitt,savedialog1.filename);
...
Warum? Weil die Datei sonst auch gespeichert wird, wenn man im Save-Dialog auf "Abbrechen" geklickt hat. Unschön.
Und zu der unerklärten, aber richtigen Antwort von dem Kaktus: Mit AssignFile ordnest Du nur der File-Variable einen Dateinamen zu, die Datei wird damit noch nicht geöffnet. Das macht erst Rewrite oder Reset. Dann kannst Du darauf schreiben bzw. davon lesen.
Gruß,
Michael