|
|
|
.bpl
|
|||
|---|---|---|---|
|
#18+
Вопрос на засыпку: Как получить список классов экспортируемых .bpl ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 23:56:24 |
|
||
|
.bpl
|
|||
|---|---|---|---|
|
#18+
Доктор, а почему меня игнорируют ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.03.2003, 16:35:31 |
|
||
|
.bpl
|
|||
|---|---|---|---|
|
#18+
Доктор, а почему меня игнорируют ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.03.2003, 16:35:32 |
|
||
|
.bpl
|
|||
|---|---|---|---|
|
#18+
Тебе это надо в программе, или нужна утилита, которая это делает? Если утилита - то tdump -ee <library_name> выводит список классов и методов, экспортируемых в библиотеке. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 04:16:47 |
|
||
|
.bpl
|
|||
|---|---|---|---|
|
#18+
Мне это нужно в программе. Вобщем я так понял, DELPHI определяет типы параметров свойств и методов классов, содержащихся в .BPL по именам экспортируемых функций. Например: @Sbaredit@TStatusBarEditor@ опеределяет конструктор класса TStatusBarEditor Получив с помощью нее указатель на Self класса, можно спокойно вызывать и другие методы класса. @Sbaredit@TStatusBarEditor@HelpButtonClick$qqrp14System@TObject А эта функция определяет обработчик события HelpButtonClick Ну это то все понятно, а вот как получить список классов я так и не врубился Используя RTTI максимум что можно получить, так это сведения о всех модулях содержащихся в .BPL ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 08:46:32 |
|
||
|
.bpl
|
|||
|---|---|---|---|
|
#18+
maloi_alex Посмотри библиотечку. В ней есть проект RADOctober. http://www.gsc.hu/download/ralib201.zip Ребята сделали интерпретатор и редактор скриптов, типа Дельфы. С возможностью подключения дельфовых bpl'ок. То что тебе надо там работает. Сделано как я понял через переопределение { Component registration handlers } var RegisterComponentsProc: procedure(const Page: string; ComponentClasses: array of TComponentClass) = nil; RegisterNoIconProc: procedure(ComponentClasses: array of TComponentClass) = nil; CurrentGroup: Integer = -1; { Current design group } из модуля Classes. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2003, 17:14:00 |
|
||
|
|
start [/forum/topic.php?fid=58&msg=32123251&tid=2118863]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
154ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
41ms |
get tp. blocked users: |
1ms |
| others: | 184ms |
| total: | 408ms |
| 0 / 0 |
