Mit etwas Glück geht das so:
Delphi-Quellcode:
uses
MSHTML;
var
doc: IHTMLDocument2;
inp: IHTMLInputElement;
frm: IHTMLFormElement;
begin
doc := WebBrowser.Document as IHTMLDocument2;
// Zugriff auf form über name
// frm := doc.forms.item('f', 0) as IHTMLFormElement;
// oder Zugriff über index
frm := doc.forms.item(0, 0) as IHTMLFormElement;
inp := frm.item('x', 0) as IHTMLInputElement;
ShowMessage(inp.value);
end;
Grüße vom marabu