Class TPERSONCOMPX (unit PERSONCOMPImpl1)

Inherits from

TActiveXControl

IPERSONCOMPX

Constructors



Functions

procedure Click;


procedure DefinePropertyPages(DefinePropertyPage: TDefinePropertyPage);


procedure EventSinkChanged(const EventSink: IUnknown);


function GetNextLine: WideString;


function Get_Cancel: WordBool;

Define property pages here.

function Get_Caption: WideString;


function Get_City: WideString;


function Get_Cursor: Smallint;


function Get_Default: WordBool;


function Get_DragCursor: Smallint;


function Get_DragMode: TxDragMode;


function Get_Enabled: WordBool;


function Get_FName: WideString;


function Get_Font: Font;


function Get_LName: WideString;


function Get_State: WideString;


function Get_Visible: WordBool;


procedure InitializeControl;

Protected declarations

TPERSONCOMPX


function IsMoreLines: WordBool;


procedure runQuery;


procedure Set_Cancel(Value: WordBool);


procedure Set_Caption(const Value: WideString);


procedure Set_City(const Value: WideString);


procedure Set_Cursor(Value: Smallint);


procedure Set_Default(Value: WordBool);


procedure Set_DragCursor(Value: Smallint);


procedure Set_DragMode(Value: TxDragMode);


procedure Set_Enabled(Value: WordBool);


procedure Set_FName(const Value: WideString);


procedure Set_Font(const Value: Font);


procedure Set_LName(const Value: WideString);


procedure Set_State(const Value: WideString);


procedure Set_Visible(Value: WordBool);


Properties

Events

Variables

FDelphiControl : TPERSONCOMP;

Private declarations

FEvents : IPERSONCOMPXEvents;



Constructors


Functions


procedure Click;


procedure DefinePropertyPages(DefinePropertyPage: TDefinePropertyPage);


procedure EventSinkChanged(const EventSink: IUnknown);


function GetNextLine: WideString;


function Get_Cancel: WordBool;

Define property pages here. Property pages are defined by calling DefinePropertyPage with the class id of the page. For example, DefinePropertyPage(Class_PERSONCOMPXPage);


function Get_Caption: WideString;


function Get_City: WideString;


function Get_Cursor: Smallint;


function Get_Default: WordBool;


function Get_DragCursor: Smallint;


function Get_DragMode: TxDragMode;


function Get_Enabled: WordBool;


function Get_FName: WideString;


function Get_Font: Font;


function Get_LName: WideString;


function Get_State: WideString;


function Get_Visible: WordBool;


procedure InitializeControl;

Protected declarations

TPERSONCOMPX


function IsMoreLines: WordBool;


procedure runQuery;


procedure Set_Cancel(Value: WordBool);


procedure Set_Caption(const Value: WideString);


procedure Set_City(const Value: WideString);


procedure Set_Cursor(Value: Smallint);


procedure Set_Default(Value: WordBool);


procedure Set_DragCursor(Value: Smallint);


procedure Set_DragMode(Value: TxDragMode);


procedure Set_Enabled(Value: WordBool);


procedure Set_FName(const Value: WideString);


procedure Set_Font(const Value: Font);


procedure Set_LName(const Value: WideString);


procedure Set_State(const Value: WideString);


procedure Set_Visible(Value: WordBool);


Properties


Events


Variables


FDelphiControl : TPERSONCOMP;

Private declarations


FEvents : IPERSONCOMPXEvents;