Saludos
tcomparacion.Edit; Para qué editar, si vas a insertar?
creo que está de más esa linea.
Aunque nunca he utilizado ese método, me viene la idea de que debes hacer post por cada InsertRecord. Podría equivocame
Pruebalo
Código Delphi
[-]
tcomparacion.InsertRecord(['Punto de Gelificación','Null',table1.FieldByName('punto_gelificacion').AsString,
vlbpunto_gelificacion,'Quimico','Null','Al 5% a 25Cº']);
tcomparacion.Post;
tcomparacion.InsertRecord(['Cenizas tot B. Humeda','Null',table1.FieldByName('cenizas_tot_bhumeda').AsString,
vlbcenizas_tot_bhumeda,'Físico','Null','xxxxxxxxxxx']);
tcomparacion.Post;