-
Vlad Oshin © (29.05.08 14:59) [0]Есть в библиотеке DevExpress такой TcxRTTIInspector,
умеет брать run-time св-ва компонент и редактировать их налету
(
в принципе, и самому можно такое сделать, но сам я так и не смог именно до TStrings достучаться
в частности, вот это делал http://delphiworld.narod.ru/base/runtime_display_props.html
http://delphiworld.narod.ru/base/object_insp_tree.html
и что-то еще с сайта Марко Кэнту смотрел,
но там мне не понравилось, т.к. не могу читать человеческие англ.комментарии на трудный код
и попробовал этот компонент
)
пишу:
for i:=0 to cxRTTIInspector1.Rows.Count-1 do
memo2.Lines.Add
(
TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Caption
+ ':'+
TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Value
);
результат:
........
ImeName:
Left:52
Lines:(TStrings)
MaxLength:0
Name:Memo1
OEMConvert:False
ParentBiDiMode:Tru
..........
Как получить все конкретные строки? -
Palladin © (29.05.08 15:06) [1]TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Value
какого типа? -
Vlad Oshin © (29.05.08 15:15) [2]
for i:=0 to cxRTTIInspector1.Rows.Count-1 do
begin
memo2.Lines.Add(TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Caption+':'+TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Value);
memo2.Lines.Add(TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.EditProperties Class.ClassName);
end;
Lines:(TStrings)
TcxButtonEditProperties
как то привести надо, видимо, как к TcxEditorRow() ? -
Vlad Oshin © (29.05.08 15:15) [3]Удалено модератором
-
Vlad Oshin © (29.05.08 15:15) [4]Удалено модератором
-
Vlad Oshin © (29.05.08 15:25) [5]TcxEditorRow(cxRTTIInspector1.Rows[i]).Properties.Value
тип variant -
имя(29.05.08 16:33) [6]Удалено модератором -
Palladin © (29.05.08 16:34) [7]боюсь, что там не все так просто... и до значения объекта ты не достучишься из самого TcxRTTIInspector