Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Process Pfad unter XP ermitteln (https://www.delphipraxis.net/5464-process-pfad-unter-xp-ermitteln.html)

Blacklotus 7. Jun 2003 15:02

OK danke Luckie so geht es perfekt :hello:

Alexander 9. Jul 2003 11:16

Re: Process Pfad unter XP ermitteln
 
Ich habe da noch mal eine Frage zu.
Luckies Code funktioniert ja nur unter NT und der andere nur unter Win9x und ME, oder? (kann das jetzt nicht testen...habe nur Linux, Win2000 und XP rechner zu Hause)
Stimmt das so?

Motzi 9. Jul 2003 11:25

Re: Process Pfad unter XP ermitteln
 
Luckies Code funktioniert unter der gesamten 9x-Reihe und in der NT-Reihe ab 2k.

BTW: es gibt eine API GetModuleFileNameEx bei der man auch die Process-ID angeben kann... Sakuras Funktion müsste demnach so ausschaun:
Delphi-Quellcode:
function GetProcessPath(Handle: Cardinal): String; stdcall;
var
  TheFileName : array[0..MAX_PATH] of char;
begin
  FillChar(TheFileName, sizeof(TheFileName), #0);
  GetModuleFileNameEx(Handle, 0, TheFileName, sizeof(TheFileName));
  Result := TheFileName;
end;

Alexander 9. Jul 2003 11:51

Re: Process Pfad unter XP ermitteln
 
Ok, dann machen ich mir das einfach und vernachlässige Win NT.
Aber Luckie hat doch
Zitat:

Mit einem Module-Snapshot kommt man an den Exe-Pfad unter NT-basierenden Systemen ran.
geschireben, dachte, dass der Code ausschließlich unter NT-Systemen funktioniert...
und welcher Typ ist hsnapmodul?

Luckie 9. Jul 2003 16:11

Re: Process Pfad unter XP ermitteln
 
THandle oder auch einfach Cardinal. Und was das unter 98/ME liefert bin ich mir nicht so sicher. Funktionieren tut es, ja.

Alexander 10. Jul 2003 09:07

Re: Process Pfad unter XP ermitteln
 
arrg da hätte ich auch selbst drauf kommen können...Danke Luckie!


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:22 Uhr.
Seite 2 von 2     12   

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