Datei löschen ohne genauen Pfad!?

[M-RaxXxoR]

Moin!,

ich und ein paar andere Leute haben ein und dasselbe Programm auf dem Pc. Jetzt muss eine Datei aus einem Ordner gelöscht werden, was ich mit

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Delete('c:\Programme\test.txt') then
...

mache. Funktioniert auch gut aber nicht wenn ich den genauen Pfad weiß denn sicherlich ist nicht bei jedem Pc der Pfad c:\...
Also probierte ich es mit

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Delete('%programfiles%\test.txt') then 
...

und das haut irgendwie mal garnicht hin :(
Der findet die Datei dann nicht. Welchen befehl muss ich dann nehmen. Kann mir jemand helfen?
Ich veruche es jetzt schon seit 2 Tagen ALLEINE rauszukriegen aber...naja. :wall:

MfG RaxXxoR

[richie]

Wenn die Datei in dem Verzeichnis deiner Exe ist, dann mit

Delphi-Quellcode:

ExtractFilePath(Application.ExeName)

:)

[TonyR]

du willst die Umgebungsvariable nutzen???

Delphi-Quellcode:

if Delete(getenvironmentvariable('programfiles')+'\test.txt') then ...

PS: Wilkommen in der DP :wink:

[M-RaxXxoR]

Aaaaaaaah, herrlich. Ihr habt es drauf Jungs. :-D
Könnt ihr mir noch sagen wie ich andere Dateien mit in meine EXE einbinde. Das kapiere ich garnicht. Irgendwier soll ich das mit Ressourcen machen hat mir mal jemand gesagt? Aber kP :roll:

[TonyR]

da musst du mal suchen... gibts schon ein haufen tutorils und so...

[Buddelflink]

Zitat:

Zitat von M-RaxXxoR

Aaaaaaaah, herrlich. Ihr habt es drauf Jungs. :-D
Könnt ihr mir noch sagen wie ich andere Dateien mit in meine EXE einbinde. Das kapiere ich garnicht. Irgendwier soll ich das mit Ressourcen machen hat mir mal jemand gesagt? Aber kP :roll:

Aaaaah, etwa die gelöschte Datei durch eine gleichnamige ersetzen :shock:. Irgendwoher kenne ich das :gruebel:

PS: neue Frage, neuer Thread

[Blackheart]

Schau mal hier
http://www.delphipraxis.net/internal...ct.php?t=87302
Und noch etwas Werbung für mein Prog
http://www.delphipraxis.net/internal...ct.php?t=93819

[M-RaxXxoR]

Danke für das Tut mit den Ressourcen. Aber das mit der Umgebungsvariable haut nicht hin :cry:
Lässt sich nicht Debuggen. Ich sollte vielleicht noch was ergänzen. Da dies nicht mit in der Liste stand hab ich gleub ich Delphi 2005 Professional angeklickt habe aber Delphi 2005 Express Edition, da ich zum Üben nicht mindestens 100€ dafür ausgeben will. Aber gibt es noch eine andere Möglichkeit?

Es geht um eine Ini Datei von einem Spiel um genau zu sein. Ich will sie durch keien gleichnahmige ersetzen.

Geiles Prog :-D

[TonyR]

Zitat:

...Aber das mit der Umgebungsvariable haut nicht hin...

Was sagt der Compiler denn, was nicht ganz richtig sei???

[himitsu]

Der sagt nichts, denn Umgebungsvariable werden von diesen Funktionen nicht übersetzt.
d.h. die Umgebungsvariable wird als Verzeichnisname angesehn, womit das ganze dann eine relative Pfadangabe wäre.

Das Resultat: die angegebene Datei existiert einfach nicht und kann demnach nicht gelöscht werden. :zwinker:

Lösung: du mußt die Umgebungsvariablen selber übersetzten!
(ich hatte mir dafür mal 'ne Funktion geschrieben ... mal sehn ob die noch existert)