AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Pfad der eigenen Anwendung - ohne Application. Param...

Pfad der eigenen Anwendung - ohne Application. Param...

Ein Thema von tn249 · begonnen am 1. Aug 2005 · letzter Beitrag vom 14. Feb 2008
Antwort Antwort
Seite 2 von 2     12
Black-Horse

Registriert seit: 29. Aug 2007
9 Beiträge
 
#11

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 7. Feb 2008, 11:15
Application.Exename kannst du in dem fall verwenden
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#12

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 7. Feb 2008, 12:19
Zitat von Black-Horse:
Application.Exename kannst du in dem fall verwenden
Was keinen Unterschied macht, da Application.Exename auch nur ParamStr(0) aufruft. Mit ParamStr0) sollte man immer den Pafd der aufrufenden Exe-Datei bekommen, egal ob sie von einer anderen Anwendung gestartet wurde oder nicht.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Olli
(Gast)

n/a Beiträge
 
#13

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 7. Feb 2008, 22:38
Komplizierter wird es nur noch, wenn man die Situation hat, daß man den Pfad der DLL aus der aktuellen DLL haben will, man aber (weil bspw. ursprünglich aus einer Bibliothek stammend) hInstance (der DLL) nicht kennt, NULL nicht nutzen kann, GetModuleHandle(NULL) auch keinen Sinn macht. Die generischste und meines Erachtens nach beste Methode zum Ermitteln des Pfades des aktuellen Moduls (nicht der EXE selbst, sondern des Moduls in dem der Code ausgeführt wird) ist, eine statische Variable zu deklarieren (also nicht auf dem Stack ) und die Basisadresse des Moduls aus der Adresse dieser Variablen zu ermitteln. Alternativ zur statischen Variablen geht auch ein Pointer auf die aktuelle Funktion welche unten beschriebene beschriebene Methode implementiert.

Dazu wird MSDN-Library durchsuchenVirtualQuery benutzt. Erster Parameter ist die Adresse der statischen Variablen. Zweiter Parameter ist ein Zeiger auf eine MEMORY_BASIC_INFORMATION-Struktur, deren Member "BaseAddress" nach dem (erfolgreichen) Aufruf von MSDN-Library durchsuchenVirtualQuery nur noch in HMODULE/HINSTANCE gecastet werden muß und dann wirklich die korrekte Basisadresse enthält.

GetModuleFileName(HMODULE(mbi->BaseAddress), Puffer, Groesse);
  Mit Zitat antworten Zitat
Benutzerbild von thule
thule

Registriert seit: 4. Okt 2007
13 Beiträge
 
#14

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 14. Feb 2008, 16:37
Ich habe mein Problem mit Hilfe des Prozessmanagements gelößt:

Delphi-Quellcode:
uses
  PSAPI, TlHelp32;

function GetProcessExeName(hProcess: THandle): String;
var
  ModuleEntry: TModuleEntry32;
  hModuleEntry: THandle;
  ProcessId: Cardinal;
begin
  if hProcess = INVALID_HANDLE_VALUE then Exit;
  ProcessId := GetWindowThreadProcessId(hProcess);
  hModuleEntry := CreateToolHelp32Snapshot(TH32CS_SNAPMODULE, ProcessId);
  ModuleEntry.dwSize := SizeOf(TModuleEntry32);
  Module32First(hModuleEntry, ModuleEntry);
  Result := MOduleEntry.szExePath;
  CloseHandle(hModuleEntry);
end;

//Bsp:
 EXE_Dir_String := ExtractFilePath(GetProcessExeName(0));
//scheint gut zu functionieren.
Gruß
Open is human
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#15

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 14. Feb 2008, 16:43
@tn249: Warum darf es nicht Application.ExeName sein trotz dessen das du ExtractFilePath verwendest?
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von sirius
sirius

Registriert seit: 3. Jan 2007
Ort: Dresden
3.443 Beiträge
 
Delphi 7 Enterprise
 
#16

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 14. Feb 2008, 18:13
Zitat von SirThornberry:
@tn249: Warum darf es nicht Application.ExeName sein trotz dessen das du ExtractFilePath verwendest?
Ob der nach 2,5 Jahren noch antwortet
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
  Mit Zitat antworten Zitat
Benutzerbild von thule
thule

Registriert seit: 4. Okt 2007
13 Beiträge
 
#17

Re: Pfad der eigenen Anwendung - ohne Application. Param...

  Alt 14. Feb 2008, 19:19
Zitat von SirThornberry:
@tn249: Warum darf es nicht Application.ExeName sein trotz dessen das du ExtractFilePath verwendest?
Weil das "application" objekt in der forms-unit definiert ist?(kp) ^^

gruß.
Open is human
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:45 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz