Source position: dialogs.pp line 81
type TCDWSEventCapability = (
cdecWSPerformsDoShow,
cdecWSPerformsDoCanClose,
cdecWSPerformsDoClose,
cdecWSNOCanCloseSupport
);