Читатель пишет:
В "Советов по 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]