Xors3D to Delphi