How to get the clicked element's ID in webbrowser using delphi

Question

How to get the ID of an element that has the focused or was clicked in webbrowse using delphi.