Hallo,
Ich versuche gerade einen Dateipfad in einer Variable zu speichern, für ein Programm, welches ungefähr folgendem Testprogramm entspricht:
Delphi-Quellcode:
procedure Test();
begin
p1String := 'H:\testend\profil1';
p2String := 'H:\testend\profil2';
p3String := 'H:\testend\profil3';
p4String := 'H:\testend\profil4';
profil1 := true; // Diese true bzw. false Werte würden je nach Benutzerauswahl automatisch auf true / false gesetzt werden
profil2 := false;
profil3 := false;
profil4 := false;
if profil1 then begin
if not DirectoryExists(p1String) then begin
CreateDir(p1String);
//andere Sachen machen, auch den Pfad p1String verwenden
end;
end;
if profil2 then begin
if not DirectoryExists(p2String) then begin
CreateDir(p2String);
//andere Sachen machen, auch den Pfad p2tring verwenden
end;
end;
if profil3 then begin
if not DirectoryExists(p3String) then begin
CreateDir(p3String);
//andere Sachen machen, auch den Pfad p3String verwenden
end;
end;
if profil4 then begin
if not DirectoryExists(p4String) then begin
CreateDir(p4String);
//andere Sachen machen, auch den Pfad p4String verwenden
end;
end;
end;
Die Pfade in einem String zu speichern funktioniert nicht und um Internet habe ich nichts dazu gefunden. Hat jemand eine Idee, wie man das umsetzen könnte, gerne auch anders? Die 4 Pfade sind immer gleich, deswegen möchte ich vermeiden, dass man als Anwender selbst einen Pfad spezifizieren muss.
Danke schonmal für eure Antworten
Edit: Doch, es funktioniert, ich weiß nicht, warum es gerade nicht funktioniert hat. Schreibt gerne als Antwort noch Vorschläge, diese Umsetzung zu optimieren