Problema con Dbgrid

[aurbano]

Amigos Buenas Tardes.


Agradeceria de su ayuda ya que soy un novato programando en Delphi y quiero aprender mas. Abajo les describo el problema.


Estoy trabajando con un dbgrid relacionado a una datasource1 y este a su vez esta relacionado a un table1 (auxiliar de compras). Tengo una tabla2 en la cual voy a grabar los registros de la tabla1 pero no los guarda bien ya que un registro reemplaza otro:

el codigo que estoy utilizando es el siguiente:

table2.insert;
table2.fieldbyname(`serial´):= dbgrid1.fields[0].asinteger;
//////asi con cada uno de los registros.
table2.post



AL INTRODUCIR EN EL DBGRID1 TABLA 1 (AUXILIAR D COMPRAS)SerialNro. FacturaDescripcionCantidadCosto/unitarioivaCosto/total22288003541jgo CABLES10 25.000 35.000 285.000 22288013541ROLINERA10 35.000 49.000 399.000 22288023541CABLES PARA BUJIAS10 25.000 35.000 285.000 22288003542JGO. CABLES20 25.000 70.000 570.000 22288013542ROLINERA10 35.000 49.000 399.000 22288023542CABLES PARA BUJIAS10 25.000 35.000 285.000 22288033543RELE10 7.500 10.500 85.500 AL GRABAR EN LA TABLA NRO. 2 (COMPRAS)SerialNro. FacturaDescripcionCantidadCosto/unitarioivaCosto/total22288023541CABLES PARA BUJIAS10Bs 35.000 Bs 25.000 Bs 285.000 22288003542JGO. CABLES20Bs 70.000 Bs 25.000 Bs 570.000 22288013542ROLINERA10Bs 49.000 Bs 35.000 Bs 399.000 22288023542CABLES PARA BUJIAS10Bs 35.000 Bs 25.000 Bs 285.000 22288033543RELE10Bs 10.500 Bs 7.500 Bs 85.500 22288033543RELE10Bs 10.500 Bs 7.500 Bs 85.500 22288013541ROLINERA10Bs 49.000 Bs 35.000 Bs 399.000