Danke für die Antworten!
Ich hab's jetzt rausgefunden, wie es geht, nämlich mit einem Module Snapshot aus der Tlhelp32:
Delphi-Quellcode:
uses
...,Tlhelp32
...
var
FModuleSnapShot: THandle;
FModule: TModuleEntry32;
FNextModuleAvailable: boolean;
begin
// Snapshot erzeugen
FModuleSnapShot:= CreateToolhelp32Snapshot(TH32CS_SNAPMODULE,GetCurrentProcessID);
FModule.dwSize := SizeOf(FModule);
// Erstes geladenes Modul holen
FNextModuleAvailable := Module32First(FModuleSnapShot,FModule);
while FNextModuleAvailable do
begin
// ---------- der Pfad des geladenen Moduls steht nun in FModule.szExePath ---------------
// Nächstes geladenes Modul holen, wenn verfügbar
FNextModuleAvailable := Module32Next(FModuleSnapShot,FModule);
end;
// Snapshot freigeben
CloseHandle(FModuleSnapShot);
end;