Текущий архив: 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.047 c
