Source position: ttprofile.pas line 20
type TCurveDirection = (
GoingUnknown,
GoingUp,
GoingDown,
GoingHoriz
);