TBaseScriptAPIData

type TBaseScriptAPIData = class(TPersistent)

protected

  FExtensionsIniFileName: string;

  FExtensionFileFilter: string;

  FExtensionFileExt: string;

  FExtensionRecWhatIs: string;

  FScriptSettingsFile: string;

  FScriptUnitFileExt: string;

  FScriptUnitRFileFilter: string;

  FScriptUnitWFileFilter: string;

  fListForClassesVars: TStringList;

  fListForClasses: TStringList;

  fListForInterfaces: TStringList;

  fListForNoObjProcedures: TStringList;

  fListForTypes: TStringList;

  fListForVars: TStringList;

  fListForConsts: TStringList;

  fListForArrays: TStringList;

  fListForRecords: TStringList;

  fListForTypeAliases: TStringList;

  fListForUnresolvedTypes: TStringList;

  FScriptEngine: TBaseScriptEngine;

  procedure Register_AllWorldClassesVars; virtual;

public

  constructor CreateEX(); virtual;

  destructor Destroy; override;

  procedure Initialase;

  procedure Clear;

  function StrGetBracketsText();

  function IsClassRegister();

  function FindWorldVarObjectType();

  function FindClassPropertyTypeName();

  function FindRegisterClassProcedure();

  function FindClassFunctionTypeName();

  function FindRecordItemTypeName();

  function FindRegisterFunctionResultStr();

  function FindArrayItemTypeName();

  function FindTypeItemTypeName();

  function FindTypeAliasesItemTypeName();

  function FindVarItemTypeName();

  function FindConstItemTypeName();

  property ExtensionsIniFileName: string; [r]

  property ExtensionFileFilter: string; [r]

  property ExtensionFileExt: string; [r]

  property ExtensionRecWhatIs: string; [r]

  property ScriptSettingsFile: string; [r]

  property ScriptUnitFileExt: string; [r]

  property ScriptUnitRFileFilter: string; [r]

  property ScriptUnitWFileFilter: string; [r]

published

  property ListForClassesVars: TStringList; [r]

  property ListForClasses: TStringList; [r]

  property ListForInterfaces: TStringList; [r]

  property ListForArrays: TStringList; [r]

  property ListForTypes: TStringList; [r]

  property ListForVars: TStringList; [r]

  property ListForConsts: TStringList; [r]

  property ListForNoObjProcedures: TStringList; [r]

  property ListForRecords: TStringList; [r]

  property ListForTypeAliases: TStringList; [r]

  property ListForUnresolvedTypes: TStringList; [r]

  property ScriptEngine: TBaseScriptEngine; [r]

end;

TBaseScriptAPIData

TObject