IHYVCLObjectReference

Overview

IHYVCLObjectReference is a base interface that provides access to an object wrapped by objects such as user interface items.

If you want to access the TMenuItem created using a VCL menu controller, you would have to write code such as:

procedure TTextEditor.HYPluginControlsRepository1AfterMergeMenuItems(

  Sender: THYPluginControlsRepository; const aHost: IHYVCLHost;

  const anUpdateID: TGUID);

var filemenu: IHYVCLMenuItem;

begin

  // Here we do a little bit of manual customization since the Open and Save

  // items need to go under the File menu

  if (aHost.MenuController=NIL) then Exit;

  filemenu := aHost.MenuController.Items.MenuItemByCaption('File');

  ((filemenu as IHYVCLObjectReference).RefObject as TMenuItem).Caption := 'This is a new caption!';

end;

Alternatively, you could set such properties using Properties, with code such as:

(filemenu as IHYVCLObjectReference).Properties['Caption'] := 'This is a new caption!';

Location

• Unit: Hydra.VCL.Interfaces.pas
• Ancestry: IHYVCLObjectReference

procedure DestroyObject

function GetProperty(const aName: string): Variant

function GetRefObject: TObject

property Properties[aName: string]: Variant read write

property RefObject: TObject read

procedure SetProperty(const aName: string; const aPropertyValue: Variant)

property Properties[aName: string]: Variant read write

property RefObject: TObject read

procedure DestroyObject

function GetProperty(const aName: string): Variant

function GetRefObject: TObject

procedure SetProperty(const aName: string; const aPropertyValue: Variant)