Jump to content

UniPopupMenu 'beforeInit' for customizing


mhmda
 Share

Recommended Posts

Hi Mohammad,

 

You can try to use like this:

type
  TXPopupMenu = class(TUniPopupMenu)

  end;
procedure TMainForm.UniFormReady(Sender: TObject);
begin
  with TXPopupMenu(UniPopupMenu1).MenuControl.JSInterface do
  begin
    JSConfig('cls', ['test']);
    JSConfig('bodyCls', ['test1']);
    JSConfig('disabledCls', ['test2']);
    JSConfig('headerOverCls', ['test3']);
    JSConfig('iconCls', ['test4']);
    JSConfig('overCls', ['test5']);
  end;
end;

Best regards.

  • Upvote 3
Link to comment
Share on other sites

  • 4 months later...
 Share

×
×
  • Create New...