Class TDelphiOle (unit myOle)

Inherits from

TObject

Constructors


constructor Create;

////////////////////////////////////////////////////////////////////////////// TDelphiOle //////////////////////////////////////////////////////////////////////////////


Functions

procedure Changed;

must be virtual for TClassFactory to work

function DoVerb(iVerb: Longint): HResult;

result in HIMETRIC

procedure Draw(dwDrawAspect: Longint;const bounds:TRect;Canvas:TCanvas);


class function GetCLSID:TCLSID;


function GetExtent(dwDrawAspect: Longint):TPoint;


class function GetProgID:string;


class function GetUserType:string;


procedure Load(str:TStream);


procedure Release;


procedure Save(str:TStream);


procedure ViewChanged(dwAspect:DWORD);


procedure SetOwner(newOwner:TMyOle);

ok, this is not always true, but in most cases changes in object data are also reflected in object view we should also call data advisory SendOnDataChange.

Properties

property owner : TMyOle


Events

Variables

fOwner : TMyOle;

save published properties


Constructors


constructor Create;

////////////////////////////////////////////////////////////////////////////// TDelphiOle //////////////////////////////////////////////////////////////////////////////


Functions


procedure Changed;

must be virtual for TClassFactory to work


function DoVerb(iVerb: Longint): HResult;

result in HIMETRIC


procedure Draw(dwDrawAspect: Longint;const bounds:TRect;Canvas:TCanvas);


class function GetCLSID:TCLSID;


function GetExtent(dwDrawAspect: Longint):TPoint;


class function GetProgID:string;


class function GetUserType:string;


procedure Load(str:TStream);


procedure Release;


procedure Save(str:TStream);


procedure ViewChanged(dwAspect:DWORD);


procedure SetOwner(newOwner:TMyOle);

ok, this is not always true, but in most cases changes in object data are also reflected in object view we should also call data advisory SendOnDataChange...


Properties


property owner : TMyOle


Events


Variables


fOwner : TMyOle;

save published properties