Игра в Delphi

[Sonechkafromtambov]

Добрый день, нам задали сделать игру "комарики на шарике". Воздушные шарики поднимаются снизу вверх по экрану с разной скоростью, причем переодически лопаются и появляются новые. Комарик, управляемый с помощью клавиш, должен по шарикам допрыгать до верху экрана. подскажите , пожалуйста, как сделать беспорядочное появление и исчезание шариков, которые двигаются с разной скорость?

[s-andriano]

Все "беспорядочное" делается с помощью функции random.
При ее помощи определяется время появления шарика, его координаты и скорость, а при необходимости - и продолжительность жизни.

[Wizard#2277]

speed, random_speed: integer;

Timer()...

speed:= speed + random_speed;
sharik.top := speed;

if (sharik.top >= form9.height) then
begin
  speed := 0;
end;

Timer()...

Randomize();

if ((kamarik.Left>sharik.left) and
    (kamarik.Left<sharik.left+sharik.Width) and
    (kamarik.top>sharik.top)  and
    (kamarik.top<sharik.top+sharik.height))then
begin
  speed := 0;
  random_speed := random(...);
  sharik.Left := random(...);
end;

-.-