dbGrid insertar en fila y columna deseada un dato

[jesusvp]

tengo:
DBGridventadetalle: TDBGrid;
CBProductoID: TComboBox;
CBnombre: TComboBox;
CBprecio: TComboBox;
BtnAgregarProducto: TButton;
txtcantidaddeproducto: TEdit;


y en el DBGridventadetalle tengo las columnas una para el ProductoID, cantidaddeproducto, precio, y total

al momento que le doy click al boton btnagregarproducto quiero q me inserte lo que tengo seleccionado en el CBnombre , CBprecio, txtcantidaddeproducto y el ultimo campo obtenerlo mediante la multiplicacion de precio por cantidad


procedure TfrmVenta0.BtnAgregarProductoClick(Sender: TObject);
var
text : string;
lst : string;
begin
inherited;
//DBGridventadetalle.Columns[1].DisplayName :='1aq12';
//DBGridventadetalle.Columns[1].PickList.add('0')//:='23s2';
//DBGridventadetalle.Columns[1].FieldName ('venta_id') := 'ksd';
//DBGridventadetalle.Columns.Items[0].Title.Caption := 'ksd';
//e estado haciendo esto pero no me ha insertado nada
dbgridventadetalle.columns[1]. pienso que a de haber una opcion para agregar la fila ya q la columna ya esta seleccionada y ponerla en la propiedad de q sea una cadena de caracteres (asstring) o algun artificio = CBNombre.Items.ValueFromIndex[1];
end;

de hecho al verlo muy detenidamente creo que sale sobrando el query por q solo requiro que lo que inserte en el dbgridventadetalle lo guarde en la base de datos al darle click a un boton

si tendran unos tips para arreglar o utilizar otros componentes se los agradecere, pd soy algo nuevo en porgramacion en delphi y les pido que entre mas especificos en sus respuestas. Gracias a todos