Porque me marca error en mis querys si utilizo el mismo para diferentes consultas

[FOURIER]

Yo te recomiendo que Uses Open para Select y ExecSQL para Delete,insert y update en el caso de que ocupes ADO sería algo más o menos así

Código SQL [-]
 
DataModulo.QBuscar.SQL.Text:='select * from ciclo where ciclo=:cic';
DataModulo.QBuscar.Parameters.ParamValues['cic'].Value:=ciclob;
DataModulo.QBuscar.Open;

En caso de BDE

Código SQL [-]
DataModulo.QBuscar.SQL.Text:='select * from ciclo where ciclo=:cic';
DataModulo.QBuscar.Params.ParamValues['cic'].Value:=ciclob;
DataModulo.QBuscar.Open;

Espero que te sirva