Форум: "Начинающим";
Текущий архив: 2008.11.02;
Скачать: [xml.tar.bz2];
ВнизНахождение компонент Найти похожие ветки
← →
zdm © (2008-09-24 10:37) [0]Добрый день. Нужно найти все Tedit на форме и проверить их состояние. Edit-ы находятся в GroupBox-ах
если делаю так:with FormSearch do
begin
for I := 0 to ControlCount-1 do
begin
ShowMessage(Controls[i].Name);
end;
end;
Выдает только имена GroupBox-оы, а вот как проверить у каждого GroupBox свои входящие в него компоненты?
вроде логика подсказывает сделатьif Controls[i].ClassNameIs("TGroupBox") then
и вторым циклом опрасить, но как я не соображу, точнее чтото вродеwith Controls[i].name do
не получается
А может я совсем торможу, помогите растормазиться
← →
www (2008-09-24 10:40) [1]FindControl
← →
Vlad Oshin © (2008-09-24 10:42) [2]var
i:integer;
begin
for I := 0 to ComponentCount - 1 do
if (Components[i] is tEdit) then ShowMessage(tEdit(Components[i]).Name);
← →
Поросенок Винни-Пух © (2008-09-24 10:42) [3]procedure EnumEdits(AContainer : TGroupBox);
begin
......
end;
← →
zdm © (2008-09-24 10:44) [4]Всем огромное спасибо.
← →
Vlad Oshin © (2008-09-24 10:45) [5]
> проверить их состояние.
Состояние - нет такого св-ва у tEdit..
:)
← →
zdm © (2008-09-24 10:48) [6]я имел ввиду под состянием Enable/Disble например.. ну в общем это не важно
← →
Anatoly Podgoretsky © (2008-09-24 10:52) [7]
> Всем огромное спасибо.
За что? Решения то не было.
Тут рекурсия нужна.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.11.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c