Может быть еще test1 := CTest1.Create(); в теле цикла напишем????????
Хотя в таком виде при c_iCount = 1000000000 это test1 := CTest1.Create();
особо не влияет на результат.