TPasTreeContainer

type TPasTreeContainer = class

protected

  FPackage: TPasPackage;

  FInterfaceOnly: Boolean;

  FOwnedElements: TFPList;

  procedure SetCurrentParser(); virtual;

public

  constructor Create;

  destructor Destroy; override;

  function CreateElement();

  function CreateFunctionType();

  procedure AddOwnedElement(); virtual;

  function FindElement(); virtual; abstract;

  function FindElementFor(); virtual;

  procedure BeginScope(); virtual;

  procedure FinishScope(); virtual;

  procedure FinishTypeAlias(); virtual;

  function FindModule();

  function CheckPendingUsedInterface(); virtual;

  function NeedArrayValues(); virtual;

  function GetDefaultClassVisibility(); virtual;

  procedure ModeChanged(); virtual;

  property Package: TPasPackage; [r]

  property InterfaceOnly: Boolean; [rw]

  property ScannerLogEvents: TPScannerLogEvents; [rw]

  property ParserLogEvents: TPParserLogEvents; [rw]

  property OnLog: TPasParserLogHandler; [rw]

  property CurrentParser: TPasParser; [rw]

  property NeedComments: Boolean; [rw]

end;

TPasTreeContainer

TObject