Typ definovaný pro vaše pohodlí. Obě pole jsou typu Integer, nikoli Word.
PointType = record X, Y : integer; end;