Links
TzFormDesigner Properties, TzFormDesigner Class, Example, See Also
EControl Form Designer Pro
Contents | Index
Previous | Up | Next
TzFormDesigner.OnGetScriptProc Property
TzFormDesigner Properties | TzFormDesigner Class | Example | See Also
Collapse All

Occurs when method property editor ask for script procedure name associated with a given property.

property OnGetScriptProc: TGetScriptProcEvent;
Description

Write this event handler to return procedure name associated with property pInfo^.Name of object Instance.

See Also

OnGetMethodNames, OnSetScriptProc, OnShowMethod, OnRenameMethod

Example

In this sample associations of script procedures and properties are stores in TStrings object (property Items in list box EventsList) with items - <ObjectName>.<PropertyName>=<ScriptProcedure> 

 

procedure TForm4.zFormDesigner1GetScriptProc(Sender, Instance: TObject;
  pInfo: PPropInfo; var ProcName: String);
begin
  ProcName := '';
  if Instance is TComponent then
    if zFormDesigner1.Root = Instance then
      ProcName := EventsList.Items.Values[PInfo^.Name]
    else
      ProcName := EventsList.Items.Values[(Instance as TComponent).Name + '.' + PInfo^.Name];
end;
Group
Links
Copyright (c) 2004 - 2011 EControl Ltd.. All rights reserved.
Contents | Index
What do you think about this topic? Send feedback!