![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Путь к своей DLL ...
TUserClass © (2008-06-20 10:13:00)Всем привет, всех с пятницей...
Как уже наверн всем известно :) - пишу тулбар для ie.
И возникла проблема получения виректории где лежит моя DLL ... Ибо вместе с ней идет chm-файл справки, и при инсталяции эта справка попадает в туже директорию, что и dll-ка. и хотелось бы ее shellexecte'ом запускать, но как я узнаю, где она лежит? Раньше всегда делал так:
var
ExDir : string; // Директория в которой лежит мой EXE
...
ExDir := Application.ExeName;
While (ExDir[Length (ExDir)] <> '\') do begin
Delete (ExDir, Length (ExDir), 1);
end;
Но теперь, естественно, Application.ExeName возвращает путь к IE. Как бы мне найти путь к моей DLL ??
П.С.
Модераторы, не посчитайте за офф-топ, но хотел бы поблагодарить Поросенка Винни-Пуха, зато что помог решить проблему с классами в моем предыдущем вопросе - весьма простое и гениальное решение он мне дал..:)
TUserClass (2008-06-20 11:50:00) [1]
> Anatoly Podgoretsky © (20.06.08 11:46) [5]
Да я сам не понял зачем. Но раз и так работает, то ОК ... Просто сначал планировалось при отсутствии файла писать мессадж, мол файл [путь + 'Help.chm'] не найден. А писать в сообщении файл C:\PROGRA~1\Borland\Delphi\Projects\IEBar\help.chm' не найденкак т не красиво - но позже я отказался от этой идеи с сообщением :)
Anatoly Podgoretsky (2008-06-20 11:46:00) [2]> TUserClass (20.06.2008 10:28:02) [2]
Зачем тебе в нормальном виде для ShellExecute?
TUserClass (2008-06-20 10:37:00) [3]
> clickmaker © (20.06.08 10:30) [3]
ААААААААААА.....оно и так работает. Всем тысяча благодарностей.
For I := 0 to 999 do begin
ShowMessage ('Благодарность!');
end;
clickmaker (2008-06-20 10:30:00) [4]а какая разница?
ну вызови GetLongPathName, если уж так хочется
TUserClass (2008-06-20 10:28:00) [5]
> Игорь Шевченко © (20.06.08 10:16) [1]
ЭЭЭЭЭЭЭЭЭЭ....есть небольшая проблемка.... GetModuleFileName(HInstance)возвращает мне вот такую бяку:
C:\PROGRA~1\Borland\Delphi\Projects\IEBar\ProjectNam~1.DLL
Мне бы в нормальном/полном виде как-нить :)
Игорь Шевченко (2008-06-20 10:16:00) [6]
> Как бы мне найти путь к моей DLL ??
GetModuleFileName(HInstance)