como ejecutar un sql mediante un Button

[el_barto]

procedure TForm4.Button3Click(Sender: TObject);
begin
  DataModule2.IBDataSet1.Last; // para que inserte despues del ultimoregistro
  DataModule2.IBDataSet1.Insert; // inserta
end;

el codigo anterior es deficiente es mejor manejar algo mas sencillo como

DataModule2.IBDataSet1.Append;

Aqui inserta despues del ultimo registro y no antes del ultimo como pasaba en el codigo anterior

Gracias a Todos