Error al ejecutar INSERT con parámetros

[[Ivanzinho]]

¿As comprobado el valor de la variable w_máximo antes de la inserción?, porque puede ser que tenga un valor nulo, aunque por otra parte me extraña que un recordcount devuelva null. Pon un punto de interrupción y comprueba el valor para ver si con ese dato podemos sacar algo más.

Un saúdo.

[elaguna]

Que tal.
Gracias por tu atención.

La variable w_maximo es de tipo entero, no se que pasa, pero lo solucioné de una forma no muy elegante pero de momento me sacó del apuro.

* Sigo haciendo la consulta para determinar el valor máximo
* Guardo los datos por medio de una Tabla
Table1.Insert
...
Table1.Post

Sé que no es lo recomendable pero urgía salir del problema, pero este persiste, ojalá puedan ayudarme.

Gracias

[Casimiro Notevi]

w_maximo : Integer;

Query1.SQL.Clear;   
Query1.SQL.Add('select max(id_planti) from planti_corr'); 
Query1.Open; 
w_maximo := query1.RecordCount + 1;  
Query1.Close;

No sé qué estás haciendo, pero en este select, w_maximo siempre
valdrá 2.
Independientemente de lo que haga el select, al ser un "max",
devuelve un registro con el valor max de id_planti.
Luego le sumas 1 a recordcount y recordcount siempre es 1, un
registro.

[afunez2007]

esta deberia ir asi y no trabajar con el recordcount, para eso no necesitas sacar el maximo

Código Delphi [-]
w_maximo : Integer;
 Query1.Active:=False; 
Query1.SQL.Clear;   
Query1.SQL.Add('select max(id_planti) as maximo from planti_corr'); 
 Query1.Active:=True; 
 w_maximo := query1.fieldbyname('maximo').asinteger + 1;  
Query1.Active:=False;

Otra cosa es el tipo de campo, dependiendo el tipo de base de datos, por ejemplo en paradox no te permite guardar un integer en un campo declarado como smallint

Por el error que dices que te da, Type minsmatch esta normalmente asociado a este tipo de situaciones

Saludos