Cita:
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.