[Yurk@]

Код:

Query.CLose;
Query.SQL.Text:='INSERT INTO YourTable (id, name, god, dlit, id_ganr,id_kach, id_rs, id_nos)
VALUES (:id, :name, :god, :dlit, :id_ganr, :id_kach, :id_rs, :id_nos)';
Query.ParamByName(id).Value:=editID.Text;
Query.ParamByName(name).Value:=editName.Text;
Query.ParamByName(god).Value:=editGod.Text;
Query.ParamByName(dlit).Value:=editDlit.Text;
Query.ParamByName(id_ganr).Value:=comboboxGanr.ItemIndex;
Query.ParamByName(id_kach).Value:=comboboxKach.ItemIndex;
Query.ParamByName(id_rs).Value:=comboboxRs.ItemIndex;
Query.ParamByName(id_nos).Value:=comboboxNos.ItemIndex;
Query.Execute;