|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Undeclared Identifier 'TCheckBox'
Здравствуйте!
Вопрос в следующем: на форме куча чекбоксов, радиобутонов и т.д. и т.п. Процедура анализирует элементы и, если натыкается на CheckBox в состоянии True, выполняет что-то, если не в True, то тоже что-то выполняет. Процедура глохнет на втором вложенном If-е с ошибкой, указанной в имени поста. Код:
for i := 0 to form6.ComponentCount - 1 do if form6.Components[i].ClassName = 'TCheckBox' then if TCheckBox(form6.Components[i]).Checked=true then begin какие-то действия end else begin какие-то действия end; Спасибо откликнувшимся! Последний раз редактировалось Red_Garry, 18.10.2016 в 11:38. |