Formular über Delphi Anwendung ausfüllen

[toms]

Vielleicht ist es ja nicht die 1. Form...
Falls die Form einen Namen hat (siehe Quelltext der Seite), kannst du die Form auch anhand seines Namens abschicken:

Delphi-Quellcode:

function WB_SubmitFrom(WebBrowser: TWebBrowser; const FormName: string): IHTMLFormElement;
var
  forms: IHTMLElementCollection;
  Doc2: IHTMLDocument2;
begin
  if Assigned(WebBrowser.Document) and
    (Succeeded(WebBrowser.Document.QueryInterface(IHTMLDocument2, Doc2))) then
    begin
      forms := Doc2.Forms as IHTMLElementCollection;
      Result := forms.Item(FormName,'') as IHTMLFormElement;
      Result.Submit;
  end;
end;