Динамические объекты

[095]

Сутки добрые, подскажите чайнику!!
Есть код
if FNode.selectNodes('//name').item[i].text = 'check' then
begin
ChBox:=TCheckBox.Create(MainFRM);
ChBox.Parent:=MainFRM;
ChBox.Name:=FNode.selectNodes('//proname').item[i].text;
ChBox.Caption:=FNode.selectNodes('//data').item[i].text;
................
По этой батве создаются объекты из XMLевского файла
Тоесть читаются теги, присваивается имя чекбокса и его свойство (если =1 то не чекет например)
Объектов ChBox огромное количество, а Как сделать свойство OnClick к ОДНОМУ ОПРЕДЕЛЕННОМУ объекту из этого списка? Мне подсказали использовать Tag, но чето в теле программы он никак не вяжется .. А на процедуру Checkbox1Click реагирует только ПОСЛЕДНИЙ из всех ChBox падла!!
HELP!

[mihali4]

А где присвоение ChBox.OnClick=...?
TAG очень хорошо вяжется, например:
case (Sender as TCheckBox).Tag of
1: ....
2: ....
....
101: ...
....

[ВалекFCRK]

можно по подробнее пожалуйста