[FENIXCH]

Recientemente solucioné un problema parecido al tuyo así que te aconsejaría usar el objeto olevariant, tiene muchas facilidades.
a tu código podrías agregarlo de la siguiente manera

Código Delphi [-]
var
  agente:Twebbrowser;

procedure TForm1.Button2Click(Sender: TObject);
var
  documento3,element: olevariant;

begin
  documento3 := agente.oleobject.document;
  element:=documento3.getElementById('pmain');
  memo1.Lines.Add(string(element.getAttribute('style', 0)));//el resultado es [object]
end;

si tienes dudas sobre el oleobject hay información muy buena en linea solo es buscarle un poco