Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Как указать класс?   Найти похожие ветки 

 
Ego   (2004-04-27 11:20) [0]

Вот такой код:
for i:=1 to 9 do
FindComponent("Panel"+IntToStr(i)).Visible:=false;

 Здесь, как я понимаю, возникает ошибка из-за того, что в этом классе нет такого свойства.А как мне указать принадлежность этого компанента к классу TPanel?


 
Digitman ©   (2004-04-27 11:22) [1]

TPanel(FindComponent("Panel"+IntToStr(i))).Visible


 
Тимохов ©   (2004-04-27 11:23) [2]

if FindComponent(...) is TPanel then
TPanel(FindComponent(...)).Visible := ...


 
Erik ©   (2004-04-27 13:46) [3]

Ну тогда уж
Var
 Panel: TPanel;
begin
 Panel := FindComponent("Panel"+IntToStr(i)) as TPanel;
 Panel..Visible := ...
Можно еще try except прикрутить.



Страницы: 1 вся ветка

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.032 c
14-1082840890
NeyroSpace
2004-04-25 01:08
2004.05.16
Хотя я не ругаюсь, но нашел этот ресурс полезным для себя :-)


1-1083651731
$tranger
2004-05-04 10:22
2004.05.16
Запуск с параметрами


9-1071409745
ZAROLF
2003-12-14 16:49
2004.05.16
Нужен совет к 2D аркаде!


6-1080627168
paul_k
2004-03-30 10:12
2004.05.16
Помогите разобратся с получением текста из TWebBrowser


3-1082487136
sergg
2004-04-20 22:52
2004.05.16
Как обойти все объекты в DataModule