Get the text description of an anchor?

How do I get the text description of an anchor?

ATagParser v2.04 includes a new property called InLink. Anytime an <a> tag is found, this flag becomes true. When the </a> is found, the flag is turned off.

All you need to do to find the text for the link is test for it in the OnText event.

Elements settings

etText

procedure TForm1.ATagParserText(Sender: TObject; Text: TTextElement;
  var Abort: Boolean);
begin
  If ATagParser.InLink Then
    ShowMessage('The text for this link is: ' + Text.Text);
end;