где находится regsrv?

← →
mixam (2004-07-27 08:07) [0]

Здравствуйте, вопрос такой: как программно узнать путь к виндовой папке где лежит regsrv32.exe? причем код должен находить папку, в зависимости от выбранной операционки.

← →
Думкин © (2004-07-27 08:17) [1]

а зачем? Путь к нему в PATH. Запускается и так, без пути.

← →
mixam (2004-07-27 08:20) [2]

а если под NT?

← →
mixam (2004-07-27 08:20) [3]

да и вообще чтоб наверняка

← →
Kerk © (2004-07-27 08:20) [4]

> а если под NT?

А какая разница?

← →
Думкин © (2004-07-27 08:21) [5]

regsvr32.exe

← →
mixam (2004-07-27 08:24) [6]

а просто без умняков , что метода нет?

← →
Думкин © (2004-07-27 08:26) [7]

А мягче можно? Без умняков - как у тебя будет.

MORE INFORMATION Regsvr32.exe is included with Microsoft Internet Explorer 3.0 or later, Windows 95 OEM Service Release 2 (OSR2) or later, and Windows NT 4.0 Service Pack 5 (SP5) or later. Regsvr32.exe is installed in the System (Windows Me/98/95) or System32 (Windows NT) folder.

← →
mixam (2004-07-27 08:31) [8]

и на том пасибо

← →
Kerk © (2004-07-27 08:35) [9]

> и на том пасибо

ТЕБЕ спасибо, что соизволил принять такой ответ.

← →
Думкин © (2004-07-27 08:44) [10]

еще GetSystemDirectory
на этом все. :(

← →
mixam (2004-07-27 10:07) [11]

все как гриться просто
спасибо

[11] mixam (27.07.04 10:07)

Заметьте, что пользователю никто не мешает переместить regsvr в другой каталог, который также включен в path. И все программы будут продолжать работать... кроме Вашей, конечно...

Сказано забудь про путь, значит забудь. Это приговор

я надеюсь ты не собираешься com-servera програмно с его помощью регистрировать

нужно то всего две процедуры

procedure RegisterComServer(const DLLName: string); type TRegProc = function: HResult; stdcall; const RegProcName = "DllRegisterServer"; { Do not localize } var Handle: THandle; RegProc: TRegProc; begin Handle := LoadLibrary(PChar(DLLName)); if Handle <= HINSTANCE_ERROR then Exit; try RegProc := GetProcAddress(Handle, RegProcName); if Assigned(RegProc) then RegProc; finally FreeLibrary(Handle); end; end; procedure UnRegisterComServer(const DLLName: string); type TRegProc = function: HResult; stdcall; const RegProcName = "DllUnregisterServer"; { Do not localize } var Handle: THandle; RegProc: TRegProc; begin Handle := LoadLibrary(PChar(DLLName)); if Handle <= HINSTANCE_ERROR then Exit; try RegProc := GetProcAddress(Handle, RegProcName); if Assigned(RegProc) then RegProc; finally FreeLibrary(Handle); end; end;
и не нужно знать, где этот самый RegSvr32.exe находится

где находится regsrv? Найти похожие ветки