Квадраты.

[Xcopy]

Задание звучит так:

Составить программу, моделирующую процесс:
В центральной области экрана 1/6 от краев рисуются 10 квадратов размером от 5 до 50 пикселей. Затем размеры квадратов начинают возрастать (скорость роста различна для разных квадратов).
При касании двух квадратов меньший уничтожается. При касании края экранарост квадрата прекращается. Все начальные параметры квадратов (координаты, размер, цвет, скорость роста)-случайные числа.

Весь день пытался сделать сам. Сделал только 2 квадрата. Слишком много параметров получается, запутался. Наведите на путь истинный.
Если кому интересно, могу то что я сделал выложить (но там каша).

[Impuls1989]

Ну это чистое ООП. Реализуйте класс квадрат. С параметрами размер, цвет и т.д. Затем создайте массив и в путь.

[Xcopy]

а класс это типо как??? В тайпе объявлять как-то?

[Impuls1989]

Вот выкладываю. Правда не успеваю доработать((( Косяки в функции CoordIn. CoordIn -возвращает true если переданные координаты попадают в текущий квадрат, и false в противном случае. А в остальном должна работать. Да и общие принципы ООП должны быть понятны.

[Xcopy]

Честно понять, нифига в этом исходнике не понял(
Но за то, что нашел время помочь такому нубу как я спасибо!
Ни у кого нету книжек по ООП?

[Impuls1989]

Ну книжка подойдет любая! Берете любую книжку по Delphi, там скорее всего есть ООП