Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Импорт класса из BPL
|
|||
|---|---|---|---|
|
#18+
В BPL описан класс TMyForm производный от TForm (проще говоря храниться форма). Как в exe-шнике динамически подгрузить этот BPL, зарегистрировать класс TMyForm, а затем создать экземпляр TMyForm. (Типа:MyForm:=TMyForm.Create(Application)) Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 14:33 |
|
||
|
Импорт класса из BPL
|
|||
|---|---|---|---|
|
#18+
Пишу по памяти, могут быть ошибки и неточности, но механизм такой ... TMyFormClass = class of TMyForm ... FHandle: HModule; ... procedure TBlaBlaBla.LoadPackageAndCreateForm() var MyForm: TMyFormClass; begin try FHandle := LoadPackage(...); MyForm := FindClass('TMyForm'); ... UnRegisterModuleClasses(Module: HMODULE); // лишним не будет UnloadPackage(FHandle); except raise; end; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 15:52 |
|
||
|
Импорт класса из BPL
|
|||
|---|---|---|---|
|
#18+
И еще, в пакете при инициализации нужно зарегистрировать TMyForm, а при деинициализации UnRegister... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 16:13 |
|
||
|
Импорт класса из BPL
|
|||
|---|---|---|---|
|
#18+
Спасибо. А не знаешь где в Итете можно почитать доки обо всем этом? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 16:16 |
|
||
|
|

start [/forum/topic.php?fid=58&gotonew=1&tid=2118866]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
63ms |
get topic data: |
9ms |
get first new msg: |
6ms |
get forum data: |
2ms |
get page messages: |
38ms |
get tp. blocked users: |
1ms |
| others: | 263ms |
| total: | 413ms |

| 0 / 0 |
