Главная страница
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.032 c
15-1158129080
DelphiLexx
2006-09-13 10:31
2006.10.08
Delphi 2006 выдает ошибку


3-1155102872
rsa_
2006-08-09 09:54
2006.10.08
подскажите что делать с unicode в delphi.


2-1158306437
mmms-
2006-09-15 11:47
2006.10.08
Не могу разобратся с простым кодом (Бегущая строка из DelphiWorld


2-1158323348
vodvorezlaya
2006-09-15 16:29
2006.10.08
Помогите с созданием формы во время работы программы


15-1158320490
Alien1769
2006-09-15 15:41
2006.10.08
Пароли..