Hola
saldanaluis
De casualidad estas creando esa sentencia SQL en tiempo de ejecución?
De ser así te convendría crear los parametros antes de asignar los valores,
No tengo a la mano TADOQuery, pero en un TQuery normalito puedes hacerlo de esta manera:
Código Delphi
[-]
Query1.Params.CreateParam(ftString, 'Almacen', ptInput);
Query1.Params.CreateParam(ftString, 'Cod_Articulo', ptInput);
De tal forma que quedaría algo así:
Código Delphi
[-]
begin
ADOQuery.Parameters.CreateParam(ftString, 'Almacen', ptInput);
ADOQuery.Parameters.CreateParam(ftString, 'Articulo', ptInput);
ADOQuery.Parameters.ParamByName('Almacen').Value := pAlmacen;
ADOQuery.Parameters.ParamByName('Articulo').Value := pArticulo;
ADOQuey.Execute;
end;
Bueno, pues espero que eso ayude, dejanos saber los resultados.
Salud OS.