Problema con Params

[utopico]

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.

[roman]

Empezado por utopico

¿A que se puede deber?

A que TADOQuery no tiene ninguna propiedad llamada Params.

// Saludos

[lucasarts_18]

Hola:

Prueba con ParamsByName...

Hasta Luego -

[vtdeleon]

Saludos

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

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

[piccolo2101]

Empezado por utopico

queryGenero.SQL.Add('WHERE Genero :cGenero');

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.

[cuburu]

Empezado por utopico

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.

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.