怎么在delphi里面写序号添加到数据库？

我数据库用的是oracle 用ado连的数据库我在数据库的表里面用一列a1来写序号，怎么样才可以在delphi的dbgrid里面实现添加一行就在数据库的表里面添加一行并加上序号 删除的时候就连序号一起删除 就象下面这样
a1  a2  a3  a4 
01  ww  ee  rr
02  w1  e1  e2
03  qq  yy  rr
04  ee  rr  tt
添加一行（tt  uu  ii ）后
a1  a2  a3  a4 
01  ww  ee  rr
02  w1  e1  e2
03  qq  yy  rr
04  ee  rr  tt
05  tt  uu  ii 
删除一行（ w1  e1  e2）后
a1  a2  a3  a4 
01  ww  ee  rr
02 qq  yy  rr
03  ee  rr  tt
04  tt  uu  ii