working code
procedure TMainForm.UniDBPivotGrid1AjaxEvent(Sender: TComponent;
EventName: string; Params: TUniStrings);
begin
if EventName='onSelect' then
ShowMessage(Params.Values['bdata']);
end;
procedure TMainForm.UniFormShow(Sender: TObject);
begin
{With UniDBPivotGrid1, JSInterface do
begin
JSAddListener('select', JSFunction('selected', 'console.log("this",this);console.log("selected",selected);'))
end;}
With UniDBPivotGrid1, JSInterface do
begin
JSAddListener('select', JSFunction('a,b', 'ajaxRequest('#1', "onSelect", ["bdata="+b.data["ext-35"]]);'))
end;
end;