namen der exe datei herausfinden

[gangs-taas]

hey,
gibt es eine möglichkeite den namen der exe datei herauszufinden ?

also ich möchte nen programm machen was dies mach :

ShowMessage('der name ist' + name der exe datei (die ich ja gerade ausführe));

d.h. solang man die datei nicht umbenennt ist der name 'Projekt1' ect.

wisst ihr was ich mein ?

[mkinzler]

ParamStr(0) oder Application.ExeName

[gangs-taas]

vielen dank

[Oldy]

Der vollständigheit halber setze ich das noch untendrunter:
Mit

Delphi-Quellcode:

ExtractFilePath(Application.ExeName)

Kannst du den Dateipfad herausfinden.
Ist das Programm im ordner C:\Programm und das programm heißt Prog.exe dann gibt die Zeile

Delphi-Quellcode:

ExtractFilePath(Application.ExeName)+'\'+Application.ExeName

C:\Programm\Prog.exe

[himitsu]

Zitat:

Zitat von Oldy

Delphi-Quellcode:

ExtractFilePath(Application.ExeName)+'\'+Application.ExeName

C:\Programm\Prog.exe

@Oldy: hast du es mal ausprobiert?

Delphi-Quellcode:

ExtractFilePath(Application.ExeName) + ExtractFileName(Application.ExeName)

ExtractFileDir(Application.ExeName) + '\' + ExtractFileName(Application.ExeName)

IncludeTrailingBackslash(ExtractFileDir(Application.ExeName)) + ExtractFileName(Application.ExeName)

[kroimon]

Und um es sauber zu machen, statt Backslash lieber den PathDelimiter verwenden:

Delphi-Quellcode:

ExtractFileDir(Application.ExeName) + PathDelim + ExtractFileName(Application.ExeName)

IncludeTrailingPathDelimiter(ExtractFileDir(Application.ExeName)) + ExtractFileName(Application.ExeName)

[SirThornberry]

Habt ihr lange Weile?

Delphi-Quellcode:

ExtractFileDir(Application.ExeName) + PathDelim + ExtractFileName(Application.ExeName)

ergibt das gleiche wie

Delphi-Quellcode:

Application.ExeName

Also warum erst den Pfad extrahieren, dann den Dateinamen extrahieren und das ganze am Ende wieder zusammensetzen anstelle gleich das zusammengesetzte zu nehmen?

[himitsu]

*voll gelangweilt sei*

nja, eigentlich ging es nur darum:

Zitat:

Zitat von Oldy

Ist das Programm im ordner C:\Programm und das programm heißt Prog.exe dann gibt die Zeile

Delphi-Quellcode:

ExtractFilePath(Application.ExeName)+'\'+Application.ExeName

C:\Programm\Prog.exe

was ja nun garnicht stimmt ... beim Nachfolgenden kam zumindestens das richtige Ergenis raus, auch wenn etwas umständlicher :roll:

[Muetze1]

ExtractFilePath() gibt immer ein abschliessenden PathDelimiter mit zurück, ExtractFileDir() hingegen immer keinen.

[Luckie]

Zitat:

Zitat von Muetze1

ExtractFilePath() gibt immer ein abschliessenden PathDelimiter mit zurück, ExtractFileDir() hingegen immer keinen.

IOrgendwie ist das nicht so ganz konsistent in der VCL. Deswegen habe ich mir angewöhnt sicher zustellen, dass der eventuell vorhandene abschliessende backslash abgeschnitten wird mit den entsprechenden Funktionen.

[haentschman]

Hallo,

:gruebel: irgendwie versteh ich den Sinn des ganzen nicht.

Zitat:

gibt es eine möglichkeite den namen der exe datei herauszufinden

Application.ExeName ergibt zwar das richtige, aber wenn man das Programm selbst geschrieben und gestartet hat sollte man eigentlich wissen wie die EXE heißt.

[himitsu]

Zitat:

Zitat von haentschman

:gruebel: irgendwie versteh ich den Sinn des ganzen nicht.
...
aber wenn man das Programm selbst geschrieben und gestartet hat sollte man eigentlich wissen wie die EXE heißt.

wenn du dein Programm weitergibst und vorallem ohne Setup, dann kann es ja sein, daß der User die Datei umbenannt hat :zwinker:

[haentschman]

ah jetzt ja... :gruebel:

Zitat:

wenn du dein Programm weitergibst und vorallem ohne Setup, dann kann es ja sein, daß der User die Datei umbenannt hat

...wieso sollte man sowas tun :gruebel:

Ich bin zu alt dafür :zwinker:

[himitsu]

z.B. die ganzen Setups/Tools von irgendwas, welches ich mir mal runtergeladen hab,

laß ich garantiert nicht Setup.exe oder Programm.exe heißen, dann finde ich ja garnichts mehr wieder :zwinker:

[haentschman]

jetzt wird´s dann zu OT...aber

Zitat:

dann finde ich ja garnichts mehr wieder

...eine vernünftige Ordnerstruktur ist da schon hilfreich :zwinker:

[SirThornberry]

Aber innerhalb des Programmes weiß man den absoluten Pfad nicht ohne ihn vorher abzufragen. Und warum sollte man den Pfad des Programmes ermitteln und dann einen ExeNamen dran hängen der eventuell gar nicht mehr stimmt. Dann einfach gleich das komplette nehmen (also Application.ExeName).
Und ich würde auch nicht drauf vertrauen das mein Programm nicht unbenannt wird.

[mkinzler]

Zitat:

Und ich würde auch nicht drauf vertrauen das mein Programm nicht unbenannt wird.

Andererseits kann niemnad erwarten, dass alles funktioniert, wenn man Dateinamen einfach ändert.

[DeddyH]

So langsam gewinne ich den Eindruck, dass die Fragestellung nicht ganz eindeutig war. Es könnte ja auch noch Application.Title gemeint gewesen sein (der dürfte aber schwieriger von außen zu ändern sein).

[mkinzler]

Oder die Caption des Hauptfensters; oder ...
:mrgreen:

[DeddyH]

...die Schuhgröße des Anwenders :mrgreen:. Aber nun genug OT, vielleicht äußert sich der TE ja nochmal dazu.

[haentschman]

nun ja, der TE hat ausschließlich nach dem Namen der EXE gefragt und nicht nach dem Pfad. Deshalb meine Verwirrung :zwinker:

Zitat:

ShowMessage('der name ist' + name der exe datei (die ich ja gerade ausführe));

d.h. solang man die datei nicht umbenennt ist der name 'Projekt1' ect.

[himitsu]

Zitat:

Zitat von DeddyH

Es könnte ja auch noch Application.Title gemeint gewesen sein (der dürfte aber schwieriger von außen zu ändern sein).

kommt drauf an ... früher und auch jetzt (ohne Application.MainFormOnTaskbar := True;) und ohne das man einen zugewiesen hat, entspricht dieser ja dem ExeName :stupid:

nja, im Grunde braucht ja nur nochmal der TE sagen, was er genau wollte :)