Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.16;
Скачать: CL | DM;

Вниз

Список классов, зарегестрированных в Delphi   Найти похожие ветки 

 
sirin ©   (2005-12-25 04:09) [0]

Собственно, как узнать сабж ?
примерно, как делает IDE по Viev->ComponentList


 
sirin ©   (2005-12-25 08:03) [1]

вопрос вдогонку
Задача - получить все компоненты на форме
Возникла проблема с использованием интерфейса TIFormInterface
получаю ссылку на него

var
 ModuleInterface: TIModuleInterface;
 EditorInterface: TIEditorInterface;
 FormInterface: TIFormInterface;
 ComponentInterface: IOTAComponent;
 ComponentIndex, ComponentCount : integer;
 CurrentComponent: IOTAComponent;
 CurrentFileName: string;
 ComponentList: array of string;
begin
 CurrentFileName := ToolServices.GetCurrentFile;
 ModuleInterface := ToolServices.GetModuleInterface(CurrentFileName);
 FormInterface := ModuleInterface.GetFormInterface;
 FormInterface := ModuleInterface.GetFormInterface;
 if FormInterface=nil then
   ShowMessage(FormInterface.FileName);



но использовать полученную ссылку не удается
Такое ощущение, что этот интерфейс просто не реализован.


 
sirin ©   (2005-12-25 08:05) [2]

Блин, неправильно написал

 if FormInterface<>nil then
   ShowMessage(FormInterface.FileName);

Проблема остается



Страницы: 1 вся ветка

Текущий архив: 2006.07.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
15-1150144664
Константинов
2006-06-13 00:37
2006.07.16
Как отстоять право на чистый воздух?


6-1134736695
SPACE!!
2005-12-16 15:38
2006.07.16
Клт.-Серв. приложение на WinSock с большим количеством клиентов.


2-1151658410
0bsid
2006-06-30 13:06
2006.07.16
Подскажите, как выдрать надпись из чужой программы?


2-1151385233
bajenovv
2006-06-27 09:13
2006.07.16
помогите плиз новичку!!!!


15-1150688558
Kerk
2006-06-19 07:42
2006.07.16
Что такое FireBird