THTMLViewer tag and element detection

I am looking for a simple text/sample application written in Delphi that uses the open source THTMLViewer component (see home at [login to view URL] ) that will perform the following function: Display the HTML tag id and attributes for wherever the mouse cursor is positioned over top the contents of the THTMLViewer component. I have provided a sample project (see attachment) where a TWebBrowser and a THTMLViewer component is placed on a form, side by side, with a TPanel at the bottom. When you click the GO button, a HTML file will be loaded (provided in the ZIP). If you then move your mouse over the text in the TWebBrowser, you will see the tag ids and attributes at the bottom of the window in the TPanel. What I want is for the same feature to work for the THTMLViewer. If you don't want to install the THTML components, then there is an EXE in the ZIP attachment that shows the sample pre-compiled. Note: No EXE files will be accepted by the buyer. Source code must be provided.