[fatalzero]

Спасибо за ответы, но всеравно ругается: Неправильный синтаксис около ключевого слова "and"

Код:

With ADOQuery1 do begin
    ParamCheck := False;
    Parameters.Clear;
    SQL.Clear;
    Sql.add(' Select reg_num from MAIN where Reg_Num in  ');
    Sql.add( '(select l_reg_num--, count(*) from LINKS where CODE=30 group by L_REG_NUM having count(*)>1)');
    Sql.add('and (Akt_Text_HTML not like ''%&gt;</ins><ins cite="mailto:NCPI-%'')');
    Active:=false;
    Active:=true;
    end;

И если закоментировать последнее добавление Sql.add, то пишет: неправильный синаксис возле l_reg_num.