лучше сделать структурку (координаты + горизонтальная скорость):
Code
type TBullet = record
x, y: integer;
vx: integer;
end;
и держать массив таких структур. А в цикле анимации пробегать по массиву и делать
Code
for i := 1 to N do Inc( bullet[i].x, bullet[i].vx );
Тут же можно проверять столкновения, проверяя координаты каждой пули с координатами других обьектов. А так, почитайте книжек, например Андрэ Ла Мота.