Hola, hice la siguiente prueba con una tabla de mi base de datos y me funcionó bien. Mi base de datos es Firebird 1.5.5. Lo diferente es que utilicé un objeto TIBQuery en vez de un TIBDataset, este ultimo objeto lo utilizo para navegación y manipulacion de registros.
Me parece que es mas apropiado un TIBQuery o incluso es mejor un TIBSQL pues estas lanzando eliminaciones de registros.
Código Delphi
[-]
for i := 10000 to 10005 do
begin
IBQuery1.SQL.Clear;
if (i < 10005) then
begin
IBQuery1.SQL.Text := 'DELETE FROM RESOLUCION WHERE ID = :Borrar';
IBQuery1.ParamByName('Borrar').Value := I;
end
else
IBQuery1.SQL.Text := 'DELETE FROM RESOLUCION WHERE ID = 1000000' ;
IBQuery1.ExecSQL;
end;