consulta valores no consecutivos mismo campo

[mRoman]

Empezado por GINMARMENOR

En relación a:



Tienes razón FROM lo olvidé en la sintaxis en el foro, pero está escrito en el código, y tambén la 'Ñ' no la permite, uso N
era por usar un lenguaje natural.

Lo cierto es que como he dicho funciona:

Código SQL [-]
                          ibQueryMotivos.close;
                          IbQueryMotivos.Clear;
                          IbQueryMotivos.add('select * from motivos where anio IN (1925,1955,1920)';
                          IbQueryMotivos.open;

y no

Código SQL [-]
                        var
                            anios:string;

                        begin
                          anios:=(1925,1955,1920);
                        
                          IBQueryMotivos.SQL.Clear;
                          IBQueryMotivos.SQL.Add('select * from motivos where año in '+ANIOS);
                          IBQueryMotivos.Open;

He intentando 200 maneras pero no lo consigo,

He intentando el procedimiento que me pones:

Código SQL [-]
procedure OnClick(Sender: TObject);
var
    cAnios : String;
begin
      cAnios:=cAnios+Edit1.Text+',';
end;


procedure EjecutarProc(Sender: TObject);
var
    cAnios2 : String;
begin
       
       cAnios2:='('+cAnios+')'
       spEjecutar.Prepared;
       spEjecutar.ParamByName('ANIOS').AsString:=cAnios2
       spEjecutar.ExecProc;
end;

Pero no sé ejecutarlo, Gracias, mañana intentaré con la mente más fresca pasar una variable a parámetro a ver.

Bueno...en vez de "ExecProc", usa "Open", ademas de que este ejemplo no estaba seguro de q funcionara, mejor usa el ejemplo mas amplio q te envié....ese ya esta probado q funciona!.

Saludos.