Delphi Basics : Point command

DelphiBasics

Point
Function

Generates a TPoint value from X and Y values

Classes unit

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

Description

The Point function takes X and Y parameter values and returns a TPoint value containing them.

Related commands

Bounds		Create a TRect value from top left and size values
PointsEqual		Compares two TPoint values for equality
PtInRect		Tests to see if a point lies within a rectangle
Rect		Create a TRect value from 2 points or 4 coordinates
TPoint		Holds X and Y integer values
TRect		Holds rectangle coordinate values

Download this web site as a Windows program.

Example code : Assign 2 TPoint variables manually and using Point

var
  start, finish : TPoint;

begin
  // Set up the start point directly
  start.X := 1;
  start.Y := 2;

  // Set up the finish point using the Point method
  finish := Point(1, 2);

  // Is the start point equal to the finish point?
  if PointsEqual(start, finish)
  then ShowMessage('start =  finish')
  else ShowMessage('start <> finish');
end;

Show full unit code

start = finish