THML attrs.name and value

I have written the following code but I can't seem to make it work, can
anyone tell me why.

procedure TForm1.HTMLDoNewElement(Sender: TObject; const ElemType:
string; EndTag: Wordbool; const Attrs: Variant; const Text: string;
  var EnableDefault: Wordbool);
begin
        Memo1.Lines.Add(Attrs.Name);
end;

I get the error message "OleError method 'Name' not supported by OLE
object"

I get the same message when trying ti use Value instead of Name. What am
i doing wrong???

Kind regards

Mark
--
Pma-Scandinavia ApS
http://www.pma.dk
Telefon : 45 82 66 55
E-mail : p...@pma.dk