ADOCommand con parámetros que no los toma

[[Caral]]

Hola
Yo tambien soy de la opinion de usar adoquery, pero en tal caso el error lo dice todo, o no?:

No se han especificado valores para algunos de los parámetros requeridos

Si lo analizas te daras cuenta que al enviar el parametro, le indicas cual es y le colocas el nombre de donde sacar la comparacion, que es ese nombre un edit supongo, si es asi, le falta el .text.

Código Delphi [-]
Código Delphi [-]procedure TFrmTransacs.Elimina_Trans_Alm_Art(pAlmacen, pArticulo: String);
begin
ADOCmd.Parameters.ParamByName('Almacen').Value := pAlmacen.text;
ADOCmd.Parameters.ParamByName('Articulo').Value := pArticulo.text;
ADOCmd.Execute;
end;

Si por el contrario se saca de otra tabla, donde se especifica eso en el codigo.
O si se localiza en una variable, donde esta esta, es general o que, no le veo la relacion?
Saludos

[[Caral]]

Hola
Hago aclaracion en base a lo que me comenta mi amigo Egostar.
Efectivamente en este caso no se usan edit's, es un error de mi parte mencionarlo, me disculpo por esto y le agradezco a mi amigo la intervencion.
Por otro lado, al desconocer el componente se le ocurre a uno que este almacena las variables, si es asi, habrá que declararlas en algun sitio, mencionarlas, no se, supongo que al no encontrar la referencia al parametro es por no encontrar la definicion de la variable, verdad, o tambien me equivoco.
Ultimamente, no doy una, disculpad.
Saludos

[saldanaluis]

Gracias por sus respuestas.
He efectuado pruebas independientes (un nuevo proyecto, una sola forma, el componente ADOConnect, y un ADOQuery, ademas de un boton en done le asigno el valor del parámetro "hard coded"
(ADOQ.Parameters.ParamByName(Articulo).value := 'GFR23'
pero me sigue saliendo el mismo error.
He buscado por todos lados con Google y aparentemente hay muchos casos similares con la DB ACCESS, pero no he encontrado respuesta.
¡¡¡Por favor ayudenme a encontrarla!!!
Gracias.
Luis

[[egostar]]

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.

[[Caral]]

Hola
Como no me gusta equivocarme, lo hice y ya.
Aqui esta, hace lo que necesitas, con parámetros y todo:
Saludos

[saldanaluis]

Muchas Gracias Caral.
Realmente fue de gran ayuda. Con lo que me enviaste me di cuenta que estaba poniendo mal el nombre de uno de los parámetros -- :-( -- y ese era el problema.
Realmente confunde el mensaje de error que envía MSACCESS al mencionar los valores de los parámetros, y no comentar nada acerca de que "no existe el nombre de la columna especificada".
Ya se resolvio.
Gracias nuevamente y saludos...
Luis

[saldanaluis]

Caral,
Disculpa que te comente esto, no es para reclamarte, pero el comando de SQL no requiere el * en

Código SQL [-]
DELETE * FROM ....

dado que no se pueden borrar solamente algunas columnas sino que se borra todo el registro que concuerda con lo especificado en el WHERE...
Veo que si funciona con el * pero lo correcto es no ponerlo en la sentencia.
Nuevamente disculpa esta corrección, pero realmente es para agradecerte tu apoyo.
Saludos.
Luis