Class TFormulaObject

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TFormulaObject = class(TComponent)

Description

Hierarchy

Overview

Fields

Private FPosition: integer;
Private FExpression: TExpression;
Private FParser: TRbwParser;
Private FFormula: string;
Private FNewSubscriptions: TStringList;
Private FNotifies: Boolean;
Private FReferenceCount: integer;
Private FOnRemoveSubscriptionList: TList;
Private FOnRestoreSubscriptionList: TList;
Private FReferenceCountList: TIntegerList;
Private FSubjectList: TList;

Methods

Private procedure SetFormula(Value: string);
Private procedure SetParser(const Value: TRbwParser);
Private procedure CompileFormula(var Value: string);
Private function GetFormula: string;
Private procedure ResetFormula;
Private function GetExpression: TExpression;
Private procedure RemoveSubscriptions(OldSubscriptions, NewSubscriptions: TStringList);
Private procedure RestoreSubscriptions;
Private procedure FixSubscriptions;
Private procedure DeleteSubscriptionEvents(OnRemoveSubscription, OnRestoreSubscription: TChangeSubscription; Subject: TObject);
Private function GetDisplayFormula: string;
Protected procedure Notification(AComponent: TComponent; Operation: TOperation); override;
Public constructor Create(AOwner: TComponent); override;
Public destructor Destroy; override;
Public procedure AddSubscriptionEvents(OnRemoveSubscription, OnRestoreSubscription: TChangeSubscription; Subject: TObject);

Properties

Public property Expression: TExpression read GetExpression;
Public property Formula: string read GetFormula;
Public property DisplayFormula: string read GetDisplayFormula;
Public property Parser: TRbwParser read FParser write SetParser;

Description

Fields

Private FPosition: integer;
 
Private FExpression: TExpression;
 
Private FParser: TRbwParser;
 
Private FFormula: string;
 
Private FNewSubscriptions: TStringList;
 
Private FNotifies: Boolean;
 
Private FReferenceCount: integer;
 
Private FOnRemoveSubscriptionList: TList;
 
Private FOnRestoreSubscriptionList: TList;
 
Private FReferenceCountList: TIntegerList;
 
Private FSubjectList: TList;
 

Methods

Private procedure SetFormula(Value: string);
 
Private procedure SetParser(const Value: TRbwParser);
 
Private procedure CompileFormula(var Value: string);
 
Private function GetFormula: string;
 
Private procedure ResetFormula;
 
Private function GetExpression: TExpression;
 
Private procedure RemoveSubscriptions(OldSubscriptions, NewSubscriptions: TStringList);

When a TDataArray or TGlobalVariable is being renamed, RemoveSubscriptions is called. It removes subscriptions to the items in OldSubscriptions and stores the items in NewSubscriptions for use in RestoreSubscriptions.

Private procedure RestoreSubscriptions;
 
Private procedure FixSubscriptions;
 
Private procedure DeleteSubscriptionEvents(OnRemoveSubscription, OnRestoreSubscription: TChangeSubscription; Subject: TObject);
 
Private function GetDisplayFormula: string;
 
Protected procedure Notification(AComponent: TComponent; Operation: TOperation); override;
 
Public constructor Create(AOwner: TComponent); override;
 
Public destructor Destroy; override;
 
Public procedure AddSubscriptionEvents(OnRemoveSubscription, OnRestoreSubscription: TChangeSubscription; Subject: TObject);

if AddSubscriptionEvents is called with new events, be sure to update RemoveSubscriptions, RestoreSubscriptions, and FixSubscriptions.

Properties

Public property Expression: TExpression read GetExpression;
 
Public property Formula: string read GetFormula;
 
Public property DisplayFormula: string read GetDisplayFormula;
 
Public property Parser: TRbwParser read FParser write SetParser;
 

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:31