Programmordner

**naudoc**

Hallo,

gibt es bei Delphi (7) einen Code, der den Pfad beinhaltet aus dem das Programm geöffnet wird?
Wenn nein: Wie kann ich diesen sonst herausfinden?

mfG

PS: Habe 10 mins gesucht, danach aufgegeben...

**mkinzler**

ExtractFilePath( Application.ExeName) bzw ExtractFilePath( ParamStr(0));

**arbu man**

Wenn du das Verzeichnis meinst in dem die Exe liegt:
ExtractFilePath(Application.exename); Sonst such mal nach GetCurrentDir

mfg, Björn

**lbccaleb**

meinst du ungefähr sowas:

label1.caption := paramstr(0);

**naudoc**

Danke!

Superschnell!

Danke!

Ich meinte

Zitat von Jeder:

ExtractFilePath(Application.exename);

**Luckie**

Zitat von arbu man:

Sonst such mal nach GetCurrentDir

Bitte nicht:

http://www.michael-puff.de/Developer...irectory.shtml

**naudoc**

uuups... noch ne Frage:

Was ist hier falsch? oder eher: Wie ist es korrekt...

markieren

Delphi-Quellcode:

			Procedure TForm1.Anderes Programm;

begin

winexec(ExtractFilePath( Application.exename)+'Project2.exe',0);

end;

mfG

**mkinzler**

Ich würde ShellExecute nehmen

**Luckie**

Zitat von naudoc:

Was ist hier falsch? oder eher: Wie ist es korrekt...

markieren

Delphi-Quellcode:

			Procedure TForm1.Anderes Programm;

begin

winexec(ExtractFilePath( Application.exename)+'Project2.exe',0);

end;

Du teillst uns nicht mit, was nicht funktioniert, was für eine Fehlermeldung kommt und was GetLastError zurückgibt.

**lbccaleb**

ja oder diese version, ist fast noch besser:

programm ausführen

Programmordner

Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Re: Programmordner

Forumregeln

naudoc Registriert seit: 7. Nov 2006 92 Beiträge	#1 Programmordner 25. Jun 2007, 19:58 Hallo, gibt es bei Delphi (7) einen Code, der den Pfad beinhaltet aus dem das Programm geöffnet wird? Wenn nein: Wie kann ich diesen sonst herausfinden? mfG PS: Habe 10 mins gesucht, danach aufgegeben...
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#2 Re: Programmordner 25. Jun 2007, 20:00 ExtractFilePath( Application.ExeName) bzw ExtractFilePath( ParamStr(0)); Markus Kinzler
	Zitat

arbu man Registriert seit: 3. Nov 2004 Ort: Krefeld 1.108 Beiträge Delphi 7 Professional	#3 Re: Programmordner 25. Jun 2007, 20:00 Wenn du das Verzeichnis meinst in dem die Exe liegt: ExtractFilePath(Application.exename); Sonst such mal nach GetCurrentDir mfg, Björn Björn >> http://bsnx.net << Virtual DP Stammtisch v1.0"iw" am 19.09.2007 - ich war dabei!
	Zitat

lbccaleb Registriert seit: 25. Mai 2006 Ort: Rostock / Bremen 2.037 Beiträge Delphi 7 Enterprise	#4 Re: Programmordner 25. Jun 2007, 20:01 meinst du ungefähr sowas: label1.caption := paramstr(0); Martin
	Zitat

naudoc Registriert seit: 7. Nov 2006 92 Beiträge	#5 Re: Programmordner 25. Jun 2007, 20:08 Danke! Superschnell! Danke! Ich meinte Zitat von Jeder: ExtractFilePath(Application.exename);
	Zitat

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#6 Re: Programmordner 25. Jun 2007, 20:13 Zitat von arbu man: Sonst such mal nach GetCurrentDir Bitte nicht: http://www.michael-puff.de/Developer...irectory.shtml Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat

naudoc Registriert seit: 7. Nov 2006 92 Beiträge	#7 Re: Programmordner 25. Jun 2007, 20:14 uuups... noch ne Frage: Was ist hier falsch? oder eher: Wie ist es korrekt... markieren Delphi-Quellcode: Procedure TForm1.Anderes Programm; begin winexec(ExtractFilePath( Application.exename)+'Project2.exe',0); end; mfG
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#8 Re: Programmordner 25. Jun 2007, 20:17 Ich würde ShellExecute nehmen Markus Kinzler
	Zitat

lbccaleb Registriert seit: 25. Mai 2006 Ort: Rostock / Bremen 2.037 Beiträge Delphi 7 Enterprise	#10 Re: Programmordner 25. Jun 2007, 20:20 ja oder diese version, ist fast noch besser: programm ausführen Martin
	Zitat