Меню сайта
Мини-чат
Чтобы добавить сообщение, необходимо авторизоваться.
Главная » Статьи » Не стандартные примеры на Delphi » Pascal

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

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


    Using 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
Категория: Pascal | Добавил: DelphiAiX (09.05.2012)
Просмотров: 478 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]