[aledieb]

Hola, proba así:

Código Delphi [-]
DataModulo.QBuscar.Active:=false;
DataModulo.QBuscar.SQL.Clear;
DataModulo.QBuscar.Parameters.Clear;
DataModulo.QBuscar.SQL.Text:='select * from ciclo where ciclo=:cic';
DataModulo.QBuscar.Parameters.ParamByName('cic').Value:=ciclob;
DataModulo.QBuscar.Active:=true;
//DataModulo.QBuscar.ExecSQL;