TPascalCodeFoldBlockTypes

type TPascalCodeFoldBlockTypes = set of (

  cfbtBeginEnd,

  cfbtTopBeginEnd,

  cfbtNestedComment,

  cfbtProcedure,

  cfbtUses,

  cfbtVarType,

  cfbtLocalVarType,

  cfbtClass,

  cfbtClassSection,

  cfbtUnitSection,

  cfbtProgram,

  cfbtUnit,

  cfbtRecord,

  cfbtTry,

  cfbtExcept,

  cfbtRepeat,

  cfbtAsm,

  cfbtCase,

  cfbtIfDef,

  cfbtRegion,

  cfbtAnsiComment,

  cfbtBorCommand,

  cfbtSlashComment,

  cfbtIfThen,

  cfbtForDo,

  cfbtWhileDo,

  cfbtWithDo,

  cfbtIfElse,

  cfbtRecordCase,

  cfbtRecordCaseSection,

  cfbtAnonymousProcedure,

  cfbtCaseElse,

  cfbtPackage,

  cfbtNone

);