Каталог вашего приложения IV

Читатель пишет:

В "Советов по Delphi" в трех публикациях с заглавием "Каталог вашего приложения" (Раздел "Разное") перечислены методы, которые будут неверно работать например с isapi dll. Для решения этой проблемы я использую такой код:

procedure TWebModule1.WebModuleCreate(Sender: TObject);
var
SP: array[0..MAX_PATH-1] of char; ScriptPath: string; begin
SetString(ScriptPath, SP, GetModuleFileName(hInstance, SP, SizeOf(SP))); ScriptPath := ExtractFilePath(ScriptPath);
// Здесь ваш код, использующий ScriptPath
end;

Best regards,
Yaroslav
oya@hotmail.ru
http://www.oya.hotmail.ru [000913]

Содержание раздела