Как узнать полный путь и имя файла загруженной DLL в Delphi?

uses Windows; 
  
procedure ShowDllPath stdcall; 
var
  TheFileName : array[0..MAX_PATH] of char; 
begin
  FillChar(TheFileName, sizeof(TheFileName), #0); 
  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName)); 
  MessageBox(0, TheFileName, 'The DLL file name is:', mb_ok); 
end; 
1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (10 оценок, среднее: 5,00 из 5)
Загрузка...
Добавить комментарий