Extraer attributo de un elemento html

[(MAJ)]

buenas muchachos, es pasado de la medianoche y estoy en las ultimas ya que llevo mas de ocho horas tratando de resolver esto...
Estoy teniendo un problema para extraer el atributo de un elemento html.

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

procedure TForm1.Button2Click(Sender: TObject);
var
  documento3:ihtmldocument3;
  element:ihtmlelement;
begin
  documento3 := agente.Document as ihtmldocument3;
  element:=documento3.getElementById('pmain')as ihtmlelement;
  memo1.Lines.Add(string(element.getAttribute('style', 0)));//el resultado es [object]
end;

Crei que con la funcion ihtmldocument3.getattribute podria conseguirlo pero me di cuenta que cuando devuelve la linea al memo1 me devuelve "[object]" lo cual al revisar el result es un olevariant, y ahi me termino de matar.

Realmente no soy un gran programador, asi que no tengo idea que es on olevariant, ni tampoco como manejarlo.
Si alguien me pudiera dar una mano, ya que recien me estoy familiarizando con estas librerias, y la documentacion me complica un poco.
Si alguien me da una mano con esto le agradeceria mucho, y si no les molesta demasiado les pido una pequeña clase sobre olevariant...
desde ya muchas gracias (otra vez)

[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

[(MAJ)]

gracias FENIXCH estuve tratando de probar tu sugerencia pero sigue sin darme el valor del atributo.
si alguien pudiera darme una mano, le agradeceria muchisimo

[Casimiro Notevi]

Empezado por (MAJ)

gracias FENIXCH estuve tratando de probar tu sugerencia pero sigue sin darme el valor del atributo.
si alguien pudiera darme una mano, le agradeceria muchisimo

En lugar de pedir que "alguien" te eche una mano, ¿por qué no explicas con detalle qué estás haciendo, cómo lo estás haciendo, qué código estás usando, qué problema tienes, qué mensaje de error, qué exactamente haces, para que te puedan ayudar?

[(MAJ)]

Gracias por la ayuda, logre solucionarlo, en la seccion trucos dejo como hacerlo

[Casimiro Notevi]

Estupendo.