[Страдалецъ]

Это вы сформировали только текст запроса, его еще надо запустить через ExecSQL;

Код:

1 2 3 4 5 6 7 8

with DM.ADOQuery1 do   begin    Active:=False;    SQL.Clear;    SQL.Add('INSERT INTO books');    SQL.Add('VALUES(''Анекдоты'', ''Никулин Ю.'', 70)');    ExecSQL;   end;