[Tutorial - Creating Custom Compound Components For UniGUI]

RAD Studio 11.3 Version 28.0.48361.3236

uniGUI Trial, uniGUI Complete Trial 

uni-1.90.0.1568

ext 7.5.1

jq 3.6.4

win32 target platform

I want to test: to make a component

when i try to use TreeIntf for method RegisterSprigType

package myWebComponents;

{$R *.res}
{$IFDEF IMPLICITBUILDING This IFDEF should not be used by users}
{$ALIGN 8}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO OFF}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS ON}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION OFF}
{$OVERFLOWCHECKS ON}
{$RANGECHECKS ON}
{$REFERENCEINFO ON}
{$SAFEDIVIDE OFF}
{$STACKFRAMES ON}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$DEFINE DEBUG}
{$ENDIF IMPLICITBUILDING}
{$IMPLICITBUILD ON}

requires
  rtl,
  vcl,
  uniGUI28,
  dsnap,
  dbrtl,
  uniGUI28Core,
  uniTools28,
  uIndy28,
  soaprtl,
  xmlrtl,
  inet,
  vclimg,
  vcldb,
  vclwinx,
  bindengine;

contains
  myWebMenuButton in 'myWebMenuButton\myWebMenuButton.pas';

end.

unit myWebMenuButton;

interface

uses
  System.SysUtils, System.Classes, Vcl.Controls, Vcl.Forms, uniGUIBaseClasses,
  uniGUIClasses, uniButton, uniBitBtn, uniMenuButton, uniGUIFrame,
  uniGUIDialogs;

  TreeIntf;

type
  TmyWebMenuButton = class(TUniMenuButton)
  private
    { Private declarations }
  protected
    { Protected declarations }

  public
    { Public declarations }
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    procedure doonClick(Sender: TObject);

  published
    { Published declarations }
  end;

procedure Register;

implementation

constructor TmyWebMenuButton.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  //
  onClick := doonClick;
end;

destructor TmyWebMenuButton.Destroy;
begin
  //
  inherited Destroy;
end;

procedure TmyWebMenuButton.doonClick(Sender: TObject);
begin
//Showmessage('test: Clicked');
(Sender as TUniMenuButton).DropdownMenu.PopupBy((Sender as TUniMenuButton))

end;

procedure Register;
begin
  RegisterComponents('myWebESP', [TmyWebMenuButton]);
  RegisterSprigType(TmyWebMenuButton, TComponentSprig);

end;

end.

but I noticed that the component also works without RegisterSprigType()

[Tutorial - Creating Custom Compound Components For UniGUI]

in my case , i use delphi 11.3 , but i try compile and ToolsAPI.pas error with DockForm not found , when did add to delphi library c:\Program Files (x86)\Embarcadero\Studio\22.0\source\ToolsAPI\ to use TreeIntf.
Anybody ca help me?