Como Empezar??

[[Lepe]]

Otra forma, quizás algo bestia.... pero muy rápida de hacer

Código Delphi [-]

var filtro : string;
begin
filtro := EmptyStr;
for i:= 0 to memo1.lines.count -1 do
  filtro := filtro + ','+QuotedStr(memo1.lines[i]);
delete(filtro,1,1);

query1.sql.text := 'select * from tabla where campo in ('+ filtro+')';
query1.Open;

Saludos