La insercion de registros funciona pero.....

[ilichhernandez]

Hola a todos, ojala alguien sepa que anda mal en estas lineas... gracias...
Este codigo de insercion me funciona casi bien pues campo "maximo", no me lo esta tomando... parece que necesito tirarlo como parametro pero no estoy seguro...


tcomparacion.Open;
tcomparacion.last;
tcomparacion.Insert;
tcomparacion.FieldByName('analisis').AsString := 'Cenizas tot base humeda';
tcomparacion.FieldByName('minimo').AsString := 'Null';
tcomparacion.FieldByName('maximo').AsString := table1.fieldbyname('cenizas_tot_bhumeda').AsString;
tcomparacion.FieldByName('resultado').AsString := vlbcenizas_tot_bhumeda;
tcomparacion.FieldByName('tipo').AsString := 'Null';
tcomparacion.FieldByName('unidad').AsString := 'Null';
tcomparacion.FieldByName('metodo').AsString := 'Null';
tcomparacion.post;
tcomparacion.close;

[Lepe]

Como optimización, puedes quitar el Last e Insert y poner un Append.

En cuanto a que no toma el valor de máximo, pon un showmessage para ver que valor tiene el campo de table1, no vaya a ser que esté cerrada esa tabla, o bien no esté en el registro que te interese.

saludos