Для сценариев, которые не открывают курсор (например, вставка, обновление или exec), используйте метод ExecSQL из TADOQuery.
Возвращает целое число, представляющее количество затронутых строк по вашему запросу.
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into Table1');
ADOQuery1.SQL.Add('select Field1 ,Field2 from Table2');
ADOQuery1.SQL.Add('where ArtNo= 1');
NumRows := ADOQuery1.ExecSQL;
ShowMessageFmt('Affected rows on Table2: %d', [NumRows]);