Save-Probleme

[DeddyH]

Auf die Gefahr, dass ich mich wiederhole: GetCurrentDir ist eine Schnapsidee, das kann zwischendurch z.B. von einem TOpenDialog geändert werden, ohne dass man das mitkriegt. Nimm doch einen absoluten Pfad, am besten einen, der von Microsoft auch für Daten angedacht ist.

[parethol]

@ DeddyH, das GetDir werd ich noch erledigen. Bin am Schreibtisch zusammen räumen, habe nichts mehr getextet im Code.

Andere Frage, wie kann es sein, dass es vor meinen paar Variabeln die ich noch geaddet habe finktioniert hat und jetzt nicht mehr?

[DeddyH]

Ich habe keine Ahnung, aus irgendeinem Grund hast Du keinen Zugriff mehr auf die Datei. Das kann an Benutzerrechten, exklusivem Zugriff eines anderen Programms oder oder oder liegen, da kann man aus der Ferne nur raten.

[sx2008]

Delphi kennt sogenannte Prozeduren und Funktionen und diese sollte man auch benützen!!
Wenn du irgendwas speichern möchtest ist es eine gute Idee den kompletten Dateinamen (inkl. Pfad) als Parameter zu übergeben.

Delphi-Quellcode:

procedure TForm1.SaveCsvDaten(const dateiname:string);
begin
  // hier den Code zum speichern der Daten einfügen
end;

// und später der Aufruf
SaveCsvDaten('C:\test.csv');  // nur zum Test einen festen Dateinamen benützen
// oder so
if SaveDialog1.Execute then
  SaveCsvDaten(SaveDialog1.FileName);

Innerhalb dieser Prozedur wird nur der Parameter dateiname benützt; so wird das eine saubere Sache.
Ausserdem wäre es sinnvoll die Daten als einen Record zu übergeben; also einen weiteren Parameter einzusetzen. (aber das wäre Schritt 2)
Aber Schritt 1 ist ganz klar die Prozedur mit dem übergebenen Dateinamen.