Поиск компонентов и применение параметров

← →
Evgeney (2010-08-06 16:06) [0]

В таблице в поле типа memo перечислены компоненты которые надо скрыть причем они разных классов, как применить свойство visible например к любому из компонентов будь то Memo или MaiMenu?
Спасибо всем откликнувшимся...

← →
Anatoly Podgoretsky © (2010-08-06 16:11) [1]

> Evgeney (06.08.2010 16:06:00) [0]

Не у всех компонент есть свойство visible

← →
Evgeney (2010-08-06 16:13) [2]

Я применяю у тех у которых есть

← →
TMemo (2010-08-06 16:31) [3]

Пропарсить Memo и применить ...

uses TypInfo;

procedure TForm1.Button1Click(Sender: TObject);
var
C:tComponent;
begin
c := FindComponent("Button1");
if c <> nil then
if GetPropInfo( C, "Visible") <> nil then
SetOrdProp( C, GetPropInfo( C, "Visible"), 0 );

> if GetPropInfo( C, "Visible") <> nil then
> SetOrdProp( C, GetPropInfo( C, "Visible"), 0 );

if IsPublishedProp( C, "Visible") then
SetOrdProp( C, "Visible", Ord(False) );

Поиск компонентов и применение параметров Найти похожие ветки