Текущий архив: 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.053 c
