Maybe something like this? with UniHTMLMemo1 do begin Lines.Add('<a href="javascript:window.parent.ajaxRequest(window.parent.'+JSName+', ''hrefClick'', [''hrefId=hrefId1''])">test</a>'); ReadOnly := True; end;   procedure TMainForm.UniHTMLMemo1AjaxEvent(Sender: TComponent; EventName: string; Params: TUniStrings); begin if EventName = 'hrefClick' then ShowMessage(Params.Values['hrefId']); end;  
    • Like
    1