como ejecutar un sql mediante un Button

[el_barto]

Gracias me has sabido ayudar pero tengo un problema:

 
procedure TForm4.Button1Click(Sender: TObject);
begin
  DataModule2.IBQuery2.SQL.Text := 'INSERT INTO producto(cod_prod, nom_prod, atr_prod1, atr_prod2, atr_prod3, atr_prod4, atr_prod5) 
  VALUES   (:cod_prod, :nom_prod, :atr_prod1, :atr_prod2, :atr_prod3, :atr_prod4, :atr_prod5)';
  DataModule2.IBQuery2.ExecSQL;

end;

este es el codigo usado para insertar nuevos productos a mi base y se ejecuta cuando hago click sobre el boton

el problema radica en que uso una grilla para poder ingresar los datos y esta grilla esta conectada a un datasource que a su vez esta conectada a un Query que como instruccion sql tiene:

 select * from producto

pero cuando hago click en el boton me saca error diciendo que el valor cod_prod es NULO y pues por supuesto que es nulo por que no he podido ingresar los datos por que la grilla no me da una fila en blanco para insertar datos....
Como debo conectar la grilla de manera que cuando haga click en el boton automaticamente la grilla me ofrezca una fila en blanco para ingresar los datos???

Espero haberme hecho entender y ojala puedan ustedes ayudarme gracias