还是TPoint问题

Question

TScrollForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
    Units :TPoint;
  public
    { Public declarations }
  end;var
  ScrollForm1: TScrollForm1;
在上面的代码中 
Units.X应该表示什么呢?

Answer 1

var
  p: Tpoint;
begin
  //P可以赋值为任何Tpoint类型的值，如果不进行赋值操作则：P.x  = 0，P.y = 0  p := mouse.CursorPos; //P坐标值为鼠标的值
  self.caption := inttostr(p.X) + ',' + inttostr(p.Y);