GlobalDictionary¶

var
  GlobalDictionary: type

  TDictionary = class(TComponent)
  public
    constructor Create(AOwner: TComponent);  override;
    destructor Destroy;  override;
    procedure AddVariable(const AName: string; const Value: string);
    procedure AddFunction(const AName: string; 
                     FReplacement: TReplaceFunction);
    procedure RemoveItem(const AName: string);
    function GetValue(AName: string) : string;
    function GetValue(const AName: string; const Args: string) : string
                 ;  virtual;
    function ReplaceStrings(const ASource: string; 
                       const MaxDepth: Integer=10) : string;  virtual;
    function Substitute(const Source: string; 
                   const Macros: Array of string = string) : string
                   ;  virtual;
  end;