Добавление, Изменение, Удаление в бд

[AndrewSemmi]

есть код на добавление полей в комбобоксы, напишите плиз код который с их использованием будет добавлять данные в бд

procedure TForm3.FormActivate(Sender: TObject);
var i, y:Byte;
begin
cbb1.Clear;
with DataModule2 do begin
tbl4.Open;
for i:=1 to tbl4.RecordCount do begin
cbb1.Items.Add(tbl4.Recordset.Fields.Item[1].Value);
tbl4.RecNo:=tbl4.RecNo+1;
end;
tbl4.RecNo:=1;
cbb4.Clear;
with DataModule2 do begin
tbl1.Open;
for y:=1 to tbl1.RecordCount do begin
cbb4.Items.Add(tbl1.Recordset.Fields.Item[1].Value);
tbl1.RecNo:=tbl1.RecNo+1;
end;
tbl1.RecNo:=1;
end;
end;
end;
end.

так же есть еще три edit

[Stilet]

С потолка:

With DataModule2.tbl4 do begin
 insert;
 FieldByName(cb.items[cb.ItemUndex]).Value:=Edit.Text;
 Post;
end;

Как подсказка, не более.