Point2 variable
Var
Point2;
Unit
TeCanvas