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

Вниз

Ошибка в переборе компонентов   Найти похожие ветки 

 
dreamse   (2006-09-17 13:12) [0]

Код :


var
 i:integer;
begin

for i:=0 to self.ComponentCount -1 do
 begin

 if (self.Components[i] is TRzCheckBox) then
  TRzCheckBox(self.Components[i] is TRzCheckBox).Checked := true;

 end;
 


Код должен перебрать все чек боксы на форме и поставить галочки но выдаёт ошибку когда доходит до нужного компонента.

В чём ошибка ?


 
DrPass ©   (2006-09-17 13:18) [1]

(self.Components[i] as TRzCheckBox).Checked := true;
или
TRzCheckBox(self.Components[i]).Checked := true;


 
Ketmar ©   (2006-09-17 13:18) [2]

в DNA? %-)
rtfm по "is" и "as".


 
dreamse   (2006-09-17 13:25) [3]

Спасибо ! Перепутал просто is и as


 
Anatoly Podgoretsky ©   (2006-09-17 13:54) [4]

И получил TRzCheckBox(True).Checked := true;



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

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

Наверх




Память: 0.47 MB
Время: 0.062 c
2-1158733020
pr_spark
2006-09-20 10:17
2006.10.08
запуск IE с определенным сайтом


2-1158408359
greengeneral
2006-09-16 16:05
2006.10.08
Как сделать чтобы в Edit1 можно было вводить только цифры?


1-1156861286
cod3r
2006-08-29 18:21
2006.10.08
ComPort Library - работа с com-портом


2-1158843472
arhis
2006-09-21 16:57
2006.10.08
Как узнать количество знаков после запятой?


1-1156694491
Still Swamp
2006-08-27 20:01
2006.10.08
Баг с TMainMenu