Problema con Params
 

Hola.
Tengo con componente TADOquery y con el siguietne codigo

For i := 1 to 20 do
begin
queryGenero.Close;
queryGenero.SQL.Add('SELECT Genero FROM Principal');
queryGenero.SQL.Add('WHERE Genero :cGenero');
queryGenero.Params[0].AsString := Genero[i];
queryGenero.ExecSql;
queryGenero.Open;
Cantidad[i] := ModuloDatos.queryGenero.RecordCount;
end;

me da el error: Undeclared indentifier: 'Params'

¿A que se puede deber?

Muchas gracias de antemano.

A que TADOQuery no tiene ninguna propiedad llamada Params.

// Saludos

Hola:

Prueba con ParamsByName...:)

Hasta Luego -

Saludos

Para dar un valor a un parametros con los AdoQuery's se hace:

Código Delphi [-]
ADOQuery1.Parameters.ParamByName('taat').value

Aún con todo lo que se ha dicho, esta línea no estaría mal también como sentencia SQL?. Vamos creo que debería ir un '=' o LIKE o '<>'.


Un saludo.

Hola, creo que lo que intentas es ir creando los parametros conforme tu ciclo, y después los almacenas en un arreglo, lo que veo que te falla es al momento de crear el parametro, lo que debes de hacer, siguiendo tu codigo es:

Código Delphi [-]
for i := 1 to 20 do
   begin
  queryGenero.Close;
  queryGenero.Clear;
  queryGenero.SQL.Add('SELECT Genero FROM Principal');
  queryGenero.SQL.Add('WHERE Genero :cGenero' + IntToStr(i));
  queryGenero.ParamByName('cGenero' + IntToStr(i)).AsString := Genero[i];
  queryGenero.ExecSql;
  queryGenero.Open;
  Cantidad[i] := ModuloDatos.queryGenero.RecordCount;
   end;

Aunque ya analizando tu código no entiendo para que lo necesitas realmente.... creo que basado en tu información estos son los cambios que debes realizar, pero cuando lo ejecutes te marcará un nuevo error debido a que si el campo llamado conforme el valor de cGenero + # no existe en tu table va a tronar.

Suerte.