Source position: dialogs.pp line 83
type TCDWSEventCapabilities = set of (
cdecWSPerformsDoShow,
cdecWSPerformsDoCanClose,
cdecWSPerformsDoClose,
cdecWSNOCanCloseSupport
);