Contar registros en un insert into

[look]

Empezado por jars

Hola amigos.
Hay alguna forma de saber cuantos registros se importaron utilizando:

Código SQL [-]
INSERT INTO TABLA2 SELECT * FROM TABLA1 WHERE....

y lo mismo para cuando es un DELETE FROM ....

Gracias

yo haria algo asi.

Código Delphi [-]
var :res:integer;

with qry do 
begin
 active := false;
 sql.clear;
 sql.add('select count(*) as val from tabla where...');
 active := true;
 res := FieldbyName('val').asInteger;
 active := false;
end;


with qry do 
begin
 active := false;
 sql.clear;
 sql.add('Insert into ....');
 ExeqSql;
end;

/// res , contendria el valor de los registros