Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности

Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
22.05.2003, 11:09
|
|||
|---|---|---|---|
|
|||
Пакеты (.bpl) |
|||
|
#18+
День добрый присутствующим. Создан пакет (.bpl), содержащий несколько классов (форм), общих для нескольких приложений. Теперь стоит задача загрузить этот пакет динамически. При работе с "обычными" DLL как бы все понятно - LoadLibrary, GetProcAddress() - и вызывай функцию. Вот, а пакеты могут содержать и функции, и формы, и компоненты ... Вопрос в следующем - как доступиться до классов(форм) из этого пакета. В Help'е нашли функции LoadPackage() и UnloadPackage() и все ... Посоветуйте что-либо или дайте, пожалуйста, ссылку на толковое описание работы с пакетами. Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
22.05.2003, 11:25
|
|||
|---|---|---|---|
|
|||
Пакеты (.bpl) |
|||
|
#18+
Меню Components->Install Packages Что значит динамически? если at RunTime - так зачем теье их грузить приложение само их загрузит... Если я что-то не понял - опиши проблему по-подробнее... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
22.05.2003, 13:07
|
|||
|---|---|---|---|
Пакеты (.bpl) |
|||
|
#18+
Точно , точно поподробнее плизз ... А вов торых в dll можно и формы тоже хранить , правда компоненты незя .. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
22.05.2003, 13:20
|
|||
|---|---|---|---|
Пакеты (.bpl) |
|||
|
#18+
if Copy((Sender as TNewBtn).DllName,Length((Sender as TNewBtn).DllName)-2,3)='bpl' then begin Handle:=LoadPackage((Sender as TNewBtn).DllName) ; FormClass:=Findclass('TForm1'); ActiveForm:=(TComponentClass(FormClass).create(Application)) as TCustomForm; activeform.showModal; activeform.Free; UnloadPackage(Handle); end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=58&tablet=1&tid=2118159]: |
0ms |
get settings: |
7ms |
get forum list: |
11ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
45ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
31ms |
get tp. blocked users: |
1ms |
| others: | 237ms |
| total: | 346ms |

| 0 / 0 |
