Delphi-Help

Описание

type TPoint = packed record
X: Longint;
Y: Longint;
end;

Тип TPoint это тип записи, содержащий целочисленные значения X и Y.

Он обычно используется для хранения 2-х мерных координат.

Пример кода

var
start, finish : TPoint;

begin
// Устанавливаем точку начала непосредственно
start.X := 1;
start.Y := 2;

// Установка точки конца, используя метод Point
finish := Point(1, 2);

// Точка начала равен точке конца?
if PointsEqual(start, finish)
then ShowMessage('start =  finish')
else ShowMessage('start <> finish');
end;

start = finish

Примечание