Cita:
Empezado por Emilio
Bicho gracias por la respuesta, no es ese el camino pero se agradece,
|
Y ¿puede saberse por qué no es ése el camino? Al menos conduce a donde quieres
:
Código Delphi
[-]
uses mshtml;
...
var
Document: IHTMLDocument2;
HTMLElement: IDispatch;
TextArea: IHTMLTextAreaElement;
begin
Document := WebBrowser.Document as IHTMLDocument2;
HTMLElement := Document.all.item('algo', 0);
if Assigned(HTMLElement) then
begin
if Supports(HTMLElement, IHTMLTextAreaElement, TextArea)then
ShowMessage(TextArea.value);
end;
end;
// Saludos