Class

TContextItem

Module

VERGENCECONTEXTORLib_TLB

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Inherits from

TOleServer

Declaration


  TContextItem = class(TOleServer)
  private
    FIntf:        IContextItem;
{$IFDEF LIVE_SERVER_AT_DESIGN_TIME}
    FProps:       TContextItemProperties;
    function      GetServerProperties: TContextItemProperties;
{$ENDIF}
    function      GetDefaultInterface: IContextItem;
  protected
    procedure InitServerData; override;
    function  Get_Subject: WideString;
    procedure Set_Subject(const pVal: WideString);
    function  Get_Role: WideString;
    procedure Set_Role(const pVal: WideString);
    function  Get_Prefix: WideString;
    procedure Set_Prefix(const pVal: WideString);
    function  Get_Suffix: WideString;
    procedure Set_Suffix(const pVal: WideString);
    function  Get_Name: WideString;
    procedure Set_Name(const pVal: WideString);
    function  Get_Value: WideString;
    procedure Set_Value(const pVal: WideString);
  public
    constructor Create(AOwner: TComponent); override;
    destructor  Destroy; override;
    procedure Connect; override;
    procedure ConnectTo(svrIntf: IContextItem);
    procedure Disconnect; override;
    function  Clone: IContextItem;
    property  DefaultInterface: IContextItem read GetDefaultInterface;
    property Subject: WideString read Get_Subject write Set_Subject;
    property Role: WideString read Get_Role write Set_Role;
    property Prefix: WideString read Get_Prefix write Set_Prefix;
    property Suffix: WideString read Get_Suffix write Set_Suffix;
    property Name: WideString read Get_Name write Set_Name;
    property Value: WideString read Get_Value write Set_Value;
  published
{$IFDEF LIVE_SERVER_AT_DESIGN_TIME}
    property Server: TContextItemProperties read GetServerProperties;
{$ENDIF}
  end;

Class Hierarchy


Class Fields

Name Type Scope Comments
FIntf Private -

Properties

Name Type Scope Comments
DefaultInterface Public -
Name WideString Public -
Prefix WideString Public -
Role WideString Public -
Subject WideString Public -
Suffix WideString Public -
Value WideString Public -

Constructors

Name Declaration Scope Comments
Create constructor Create(AOwner: TComponent); override; Public -

Destructors

Name Declaration Scope Comments
Destroy destructor Destroy; override; Public -

Methods

Name Declaration Scope Comments
Clone function Clone: IContextItem; Public -
Connect procedure Connect; override; Public -
ConnectTo procedure ConnectTo(svrIntf: IContextItem); Public -
Disconnect procedure Disconnect; override; Public -
Get_Name function Get_Name: WideString; Protected -
Get_Prefix function Get_Prefix: WideString; Protected -
Get_Role function Get_Role: WideString; Protected -
Get_Subject function Get_Subject: WideString; Protected -
Get_Suffix function Get_Suffix: WideString; Protected -
Get_Value function Get_Value: WideString; Protected -
GetDefaultInterface function GetDefaultInterface: IContextItem; Private -
InitServerData procedure InitServerData; override; Protected -
Set_Name procedure Set_Name(const pVal: WideString); Protected -
Set_Prefix procedure Set_Prefix(const pVal: WideString); Protected -
Set_Role procedure Set_Role(const pVal: WideString); Protected -
Set_Subject procedure Set_Subject(const pVal: WideString); Protected -
Set_Suffix procedure Set_Suffix(const pVal: WideString); Protected -
Set_Value procedure Set_Value(const pVal: WideString); Protected -