Форум: "Начинающим";
Текущий архив: 2008.07.20;
Скачать: [xml.tar.bz2];
ВнизПуть к своей DLL ... Найти похожие ветки
← →
TUserClass (2008-06-20 10:13) [0]Всем привет, всех с пятницей...
Как уже наверн всем известно :) - пишу тулбар для 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 ??
П.С.
Модераторы, не посчитайте за офф-топ, но хотел бы поблагодарить Поросенка Винни-Пуха, зато что помог решить проблему с классами в моем предыдущем вопросе - весьма простое и гениальное решение он мне дал..:)
← →
Игорь Шевченко © (2008-06-20 10:16) [1]
> Как бы мне найти путь к моей DLL ??
GetModuleFileName(HInstance)
← →
TUserClass (2008-06-20 10:28) [2]
> Игорь Шевченко © (20.06.08 10:16) [1]
ЭЭЭЭЭЭЭЭЭЭ....есть небольшая проблемка.... GetModuleFileName(HInstance) возвращает мне вот такую бяку:C:\PROGRA~1\Borland\Delphi\Projects\IEBar\ProjectNam~1.DLL
Мне бы в нормальном/полном виде как-нить :)
← →
clickmaker © (2008-06-20 10:30) [3]а какая разница?
ну вызови GetLongPathName, если уж так хочется
← →
TUserClass (2008-06-20 10:37) [4]
> clickmaker © (20.06.08 10:30) [3]
ААААААААААА.....оно и так работает. Всем тысяча благодарностей.For I := 0 to 999 do begin
ShowMessage ("Благодарность!");
end;
← →
Anatoly Podgoretsky © (2008-06-20 11:46) [5]> TUserClass (20.06.2008 10:28:02) [2]
Зачем тебе в нормальном виде для ShellExecute?
← →
TUserClass © (2008-06-20 11:50) [6]
> Anatoly Podgoretsky © (20.06.08 11:46) [5]
Да я сам не понял зачем. Но раз и так работает, то ОК ... Просто сначал планировалось при отсутствии файла писать мессадж, мол файл [путь + "Help.chm"] не найден. А писать в сообщении файл C:\PROGRA~1\Borland\Delphi\Projects\IEBar\help.chm" не найден как т не красиво - но позже я отказался от этой идеи с сообщением :)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.07.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.042 c