|
#1
|
|||
|
|||
FindComponent
Привет всем!
Такой вопрос! На форме есть 5 CheckBox'ов с именами CheckBox1 .. CheckBox5. Когда делаю I:=0;на строчке with (FindComponent(S) as TCheckBox) do Checked:=True выдается сообщение об ошибке: Project CBReg.exe raised exception class EAccessViolation with message 'Access violation at address 004045A8 in module 'CBReg.exe'. Write of address 00000080'. Process stopped. Use Step or Run to continue. т.е. судя по всему не находится компонент. ПОЧЕМУ?!?! Если сделать, например, в обработчике события OnMouseMove для CheckBox1 следующее TCheckBox(FindComponent('CheckBox'+IntToStr(1))).C hecked:=True все проходит отлично. Ставится галочка без ошибок... Последний раз редактировалось johnos, 24.10.2006 в 13:35. |
#2
|
|||
|
|||
Народ, отбой. Разобрался. У меня в этой же процедуре был оператор with Query, где Query - компонент ADOQuery. Судя по всему, бага была здесь. Когда убрал with все заработало.
|