Einzelnen Beitrag anzeigen

gandime
(Gast)

n/a Beiträge
 
#1

WebBrowserBeforeNavigate2 PostData edit?

  Alt 6. Sep 2007, 18:28
Hi,
ich möchte bevor ich auf die Seite zugreife gleich den PostData auslesen und verändern, damit ich mich direkt einlogge:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  WebBrowser1.Navigate('https://login.yahoo.com/config/login?');
end;

procedure TForm1.WebBrowser1BeforeNavigate2(ASender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  PostData.document.forms.item(0).elements.item('username').value:='a';
  PostData.document.forms.item(0).elements.item('passwd').value:='b;
end;
das war meine erste Idee aber naja so funktioniert es wohl nicht

aber wie dann?

mfg
gandime
  Mit Zitat antworten Zitat