Source position: ctzengl.pas line 35
type TContact = record
otherSprite: TSprite;
points: array of TPointF;
end;