Турбо Паскаль 6.0

TRect Objects


Поля

A A: TPoint А - это точка, определяющая верхний левый угол прямоугольника на экране.

B B: Point В - это точка, определяющая нижний правый угол прямоугольника на экране.

Методы

Assign procedure Assign(XA, YA, XB, YB: Integer); Этот метод назначает значения параметров полям прямоугольника. ХА становится А.Х, ХВ становится Х.В и т.д.

Copy procedure Copy(R: TRect); Copy устанавливает все поля равными прямоугольнику R.

Move procedure Move(ADX, ADY: Integer); Перемещает прямоугольник, добавляя ADX к A.X и B.X и добавляя ADY к A.Y и B.Y.

Grow procedure Grow(ADX, ADY: Integer); Изменяет размер прямоугольника, вычитая ADX из A.X, добавляя ADX к B.X, вычитая ADY из A.Y и добавляя ADY к B. Y.

Intersect procedure Intersect(R: TRect); Изменяет положение и размер прямоугольника до области, определенной пересечением текущего положения и R.

Union procedure Union(R: TRect); Изменяет прямоугольник до его объединения с прямоугольником R; т.е. до наименьшего прямоугольника, содержащего этот объект и R.

Contains function Contains(P: TPoint): Boolean; Возвращает True, если прямоугольник содержит точку P.

Equals function Equals(R: TRect): Boolean; Возвращает True, если R равен данному прямоугольнику.

Empty function Empty: Boolean; Возвращает True, если прямоугольник пустой, т.е. не содержит символьного пространства. Таким образом поля A и B равны.



Содержание раздела