type TSPoint = class
    function Create();
    begin
        {self.}X := 0;
        {self.}Y := 0;
    end
    X: real;
    Y: real;
end;