Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   

Имя класса компонента и модуля

Мне необходима функция, которая возвращала бы имя класса компонента и имя модуля, где определен данный класс.

Например: xxx('TPanel') возвращала бы 'ExtCtrls'

Также мне необходима функция, возвращающая список имен страниц палитры компонентов.


Uses TypInfo;

Function ObjectsUnit (Obj: TClass): String; 
Begin
  Result := GetTypeData (PTypeInfo(Obj.ClassInfo))^.UnitName
end;

Для создания описанной вами функции "Какой модуль" могут использоваться описанные в TOOLINTF.INT методы GetModuleCount, GetModuleName, GetComponentCount и GetComponentName.

Для получения представления о формате палитры компонентов обратитесь к файлу DELPHI.INI.

           


Всё для компьютера - скачать бесплатно касперский 2010 - программы . Обучение вождению - обучение вождению акпп. Уроки вождения. . Биглион ру. Web проект купонов на скидки: Биглион и скидка кафе. . Ламинат 32, 33 и 34 класс. Скидки - кожаный ламинат. Стань Представляющим брокером. .


Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011