Puede ser -como te lo menciona mamcx-, pero con una variante/parámetro
Código SQL
[-]select * from motivos where año
IN :anios
Lo cual el parámetro "anios", contendría una cadena como la que sigue
, el cual se llenaría mediante programación en una variable y se asignaría al parámetro:
Ejemplo:
Código Delphi
[-]
procedure OnClick(Sender: TObject);
var
cAnios : String;
begin
cAnios:=cAnios+Edit1.Text+',';
end;
Y luego ejecutaría el procedimiento
Código Delphi
[-]
procedure EjecutarProc(Sender: TObject);
var
cAnios2 : String;
begin
cAnios2:='('+cAnios+')'
spEjecutar.Prepared;
spEjecutar.ParamByName('ANIOS').AsString:=cAnios2
spEjecutar.ExecProc;
end;
Algo mas o menos asi lo haría, no tengo a la mano Delphi para probar, pero podrías intentarlo y nos dices si mas o menos te sirvio.
Saludos.