[Black Raider]

Уже ж давали про Edit

Под рукой Дельфи нет так что если что подправьте:

Код:

for i:=0 to Form1.ComponentCount-1 do
begin
  if (form1.components[i] is TCheckbox) then begin
    if (form1.components[i] as TCheckbox).checked then  st:='ДА'
    else st:='Нет';
    //INSERT to TABLE
  end;
end;

где то так.