Webbrowser POST Daten auslesen

[Ajintaro]

Hallo DP !

Ich nutze einen TWebBrowser um bei einem online-Dienst eine Bezahlung durchzuführen. Nach mehreren Schritten wird man wieder zur eigenen Seite umgeleitet. Dabei wird der Status der Transaktion per POST zurückgegeben - und genau da liegt mein Problem. Wie komme ich an diese POST Daten nach dem redirect heran ?

Es gibt zwar ein paar gute Beispiele für Indy und das OnRedirect Ereignis, aber ich muss zwingend einen Browser benutzen um die Eingaben machen zu können. Geht es nicht ohne Indy ?

[himitsu]

Was ist die "eigene Seite" ?

Eigener HTTP-Server oder ein Script (PHP oder Dergleichen) und schon bekommst du da drin, beim Aufruf der Seite, doch alles geliefert.

[Ajintaro]

Hi,

ja ich hab es nun mit PHP und

Delphi-Quellcode:

 function GetWebBrowserHTML(const WebBrowser: TWebBrowser): String;
var
  LStream: TStringStream;
  Stream : IStream;
  LPersistStreamInit : IPersistStreamInit;
begin
  if not Assigned(WebBrowser.Document) then exit;
  LStream := TStringStream.Create('');
  try
    LPersistStreamInit := WebBrowser.Document as IPersistStreamInit;
    Stream := TStreamAdapter.Create(LStream,soReference);
    LPersistStreamInit.Save(Stream,true);
    result := LStream.DataString;
  finally
    LStream.Free();
  end;
end;

gelöst.