Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Programmordner (https://www.delphipraxis.net/94701-programmordner.html)

naudoc 25. Jun 2007 19:58


Programmordner
 
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 25. Jun 2007 20:00

Re: Programmordner
 
Delphi-Quellcode:
ExtractFilePath( Application.ExeName)
bzw
Delphi-Quellcode:
ExtractFilePath(  ParamStr(0));

arbu man 25. Jun 2007 20:00

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

mfg, Björn

lbccaleb 25. Jun 2007 20:01

Re: Programmordner
 
meinst du ungefähr sowas:


Delphi-Quellcode:
label1.caption := paramstr(0);

naudoc 25. Jun 2007 20:08

Re: Programmordner
 
Danke!

Superschnell!

Danke!

Ich meinte

Zitat:

Zitat von Jeder
Delphi-Quellcode:
ExtractFilePath(Application.exename);


Luckie 25. Jun 2007 20:13

Re: Programmordner
 
Zitat:

Zitat von arbu man
Sonst such mal nach GetCurrentDir

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

naudoc 25. Jun 2007 20:14

Re: Programmordner
 
uuups... noch ne Frage:

Was ist hier falsch? oder eher: Wie ist es korrekt...
Delphi-Quellcode:
Procedure TForm1.Anderes Programm;
begin
winexec(ExtractFilePath( Application.exename)+'Project2.exe',0);
end;
mfG

mkinzler 25. Jun 2007 20:17

Re: Programmordner
 
Ich würde ShellExecute nehmen

Luckie 25. Jun 2007 20:19

Re: Programmordner
 
Zitat:

Zitat von naudoc
Was ist hier falsch? oder eher: Wie ist es korrekt...
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 25. Jun 2007 20:20

Re: Programmordner
 
ja oder diese version, ist fast noch besser:

programm ausführen


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:59 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz