 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Как найти список свойств объекта? 
| Vit |
|
|||
 Vitaly Nevzorov  Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
В Run-Time нужно составить список названий свойств обекта (не их значений!):
Например для Edit1:TEdit Получить список строк: Anchors Autoselect Autosize BiDiMode BorderStyle Charcase Color и т.д. И как зная например строку 'Color' и номер цвета задать цвет компонента, не по прямому указанию свойства, а через строку (что-то типа как я могу найти и изменить компонент по имени, только для свойств компонентов) -------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
Загрузка ...
| MBo |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 234 Регистрация: 10.6.2002 Репутация: 3 Всего: 18 |
см. typinfo.pas
Если будут трудности с реализацией, примеры есть http://www.lmc-mediaagentur.de/dpool/pascal02.htm |
|||
|
||||
| Vit |
|
|||
|
Vitaly Nevzorov Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
Классный ресурс! Огромное спасибо за помощь! -------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
| Vit |
|
|||
|
Vitaly Nevzorov Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
Для стандартных компонентов работает, а вот если я к форме добавлю собственное свойство, то ни в какую, в чём прикол?
type TSettingsMainForm = class(TForm) private FTree: string; public Property Tree:string read FTree write FTree; end; Var SettingsMainForm=TSettingsMainForm; p: PPropInfo; ... p := GetPropInfo(SettingsMainForm.ClassInfo,'Tree'); if Assigned(p) then << всегда False! SetOrdProp(SettingsMainForm, p, Integer('Aaaa'); Что я делаю неправильно? -------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
| Vit |
|
|||
|
Vitaly Nevzorov Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
Всё, дошло! Оказывается это работает только с Published свойствами - сделал свойство формы типа Published (бред конечно) и всё работает.
-------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0712 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |