Fehler bei Adressierung einer Textdatei zum zugehörigen Ordner

[DeddyH]

ChangeFileExt

[Newcomer91]

if not FileExists(sDir+ ChangeFileExt(edtHeadline.text)'txt') then
Hab es bereits mit und ohne hochkommas sowie mit und ohne punkt getestet.

Was mache ich falsch?

//Edit: In der Fehlermeldung wurde von nicht genügend wirklichen parametern gesprochen

[DeddyH]

ChangeFileExt(edtHeadline.text, '.txt') Das steht doch in der Hilfe schön beschrieben.

[edit]

Zitat von Bernerbaer:

Warnung!
Unabhängig zu den schon des öftern erwähnten ExtractFilePath-Problem. Empfehle ich Dir dein Vorgehen nochmals zu überdenken.

Ohne weiteres von deinem Programm zu wissen, denke ich dass es mindestens bedenklich ist, im Programmverzeichnis Daten abzulegen. Unter Windows Vista oder Windows Seven haben Benutzer (auch als Administratoren angemeldete) in der Regel keine Schreibrechte! Microsoft schlägt andere Ordner vor (z.Bsp. Application Data) um solche Daten abzuspeichern.

Das kann man aber nicht unbedingt verallgemeinern. Für mobile Anwendungen ist es gängige Praxis, Daten im eigenen Verzeichnis abzulegen. Trotzdem ist der Hinweis natürlich angebracht. [/edit]

[jfheins]

jaja, Brute-Force-Programmieren ist doch toll

Wie man beim Klicken auf den Link erfährt, benötigt ChangeFileExt genau 2 Parameter. Parameter werden nach dem Funktionsnamen in Klammern angegeben, voneinander mit Kommata getrennt.

Das sieht dann z.B. so aus:
AssignFile(txt, sDir +'Experience.txt'); Da werden auch 2 Parameter übergeben.

Jetzt guck dir dein Konstrukt nochmal genau an

[Newcomer91]

Es funktioniert, danke euch allen

@jfheins wie kommst du auf Bruteforce?

Ich kann hier ja offen schreiben. Es wird eine Erweiterung für meinen Notizblock
in welcher ich Problemberichte mit Lösungen formuliere die dann in seperate txt dateien abgespeichert werden.
So kann ich einfach nachschlagen was ich wie wo wann gelöst habe.

[haentschman]

Zitat:

@jfheins wie kommst du auf Bruteforce?

...bedeutet in diesem Zusammenhang soviel wie "Probieren bis es klappt" oder "Learning by doing"...

[Deep-Sea]

Zitat von haentschman:

...bedeutet in diesem Zusammenhang soviel wie "Probieren bis es klappt" oder "Learning by doing"...

[OT]
Naja, Learning by doing bedeutet, dass man auch was dabei lernt, während das planlose durchprobieren vlt. irgendwann mal klappt, aber ohne das man weiß, warum eigentlich
[/OT]

[DeddyH]

[OT] Immerhin lernt man dabei, dass man nur lange genug herumprobieren muss, damit es irgendwann klappt [/OT]