Функция Point – генерирует значение TPoint из значений X и Y

Функция Point в Delphi генерирует значение TPoint из значений X и Y.

Функция Printer: Печать текстовых строк ширины и высоты страницы на странице

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;