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

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

Код:

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