Delphi-Help

Описание

function Point ( const X, Y : Integer ) : TPoint;

Функция Point берет параметр X и Y и возвращает значение TPoint, содержащее их.

Пример кода

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

Примечание