Всем привет, вот так не работает
Код:
for i:= 0 to DBCtrlGrid1.ComponentCount - 1 do
begin
if (DBCtrlGrid1.Components[i] is TDBCheckBox) then
begin
inc(j);
if (DBCtrlGrid1.Components[i] as TDBCheckBox).Checked then
inc(k);
end;
end;
Проверить в датасете нет возможности, нужно именно в компоненте