скрыть

скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Поиск свойств



Я хотел бы во время выполнения приложения получить, если возможно, список всех свойств компонента. (Список и тип каждого свойства)

Хороший материал по этому вопросу вы найдете в typinfo.pas (каталог Docs); нижеследующий код заполнит компонент Memo именами свойств:


Uses TypInfo;

procedure TForm1.Button1Click(Sender: TObject);
var
  PropList: pPropList;
  J, I: Integer;
begin
  Memo1.Lines.Clear;
  getMem(PropList, sizeof(tPropList));
  J := GetPropList(TypeInfo(tButton), tkProperties, PropList);
  for I := 0 to J - 1 do
    Memo1.Lines.Add(PropList^[I]^.Name);
  FreeMem(PropList, sizeof(tPropList));
end;






Copyright © 2004-2016 "Delphi Sources". Delphi World FAQ




Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook