Source position: pastounittest.pp line 40
type TTestPropertyOption = (
Default
tGetBounds,
tRequired,
tNotify,
tMaxLen
);