Hallo ich habe eine Lösung gefunden:
Hier ein Beispielcode:
Code:
uses
MSHTML;
var
WebForm :HTMLFormElement;
WebDoc : HTMLDocument
begin
WebBrowser2.OleObject.document.forms.item(0).elements.item('username').value:='jochen.bender';
WebBrowser2.OleObject.document.forms.item(0).elements.item('password').value:='*********';
WebDoc := WebBrowser2.Document as HTMLDocument;
WebForm := WebDoc.forms.item(varEmpty, 0) as HTMLFormElement;
WebForm.submit;
end;
cu masters001