EmbeddedWB liefert keinen Quelltext einer Webseite

[Codewalker]

Hallo zusammen.

Ich möchte in einer Klasse den EmbeddedWB nutzen, um den Quelltext einer Webseite zu ermitteln. Der relevante Ausschnitt sieht so aus:

Delphi-Quellcode:

function TWebInputTask.Execute: boolean;
begin
  if not Browser.NavigateWait(Self.URL, Timeout) then
  begin
    FLastError := 'Could not open URL - Timelimit exceeded';
    Exit(False);
  end else
  begin
    Browser.WaitWhileBusy;
    Self.Payload.Text := Browser.DocumentSource;
    Exit(True);
  end;
end;

Problem ist: Ich bekomme nur den HEAD-Teil der HTML-Datei. Der gesamte Body und das umgebende HTML-Tag fehlen. Was mache ich falsch bzw. wie komme ich an den kompletten Quelltext?

[fatalerror]

Zitat:

Zitat von Codewalker

Hallo zusammen.

Ich möchte in einer Klasse den EmbeddedWB nutzen, um den Quelltext einer Webseite zu ermitteln. Der relevante Ausschnitt sieht so aus:

Wenn du den EmbeddedWB nur dafür brauchst den HTML-Quelltext auszulesen, dann ist es meines Erachtens ein unnötiger Overhead. Die Indys tun das selbe bedeutend ressourcenschonender:

Delphi-Quellcode:

  seiteninhalt:= IdHTTP1.Get(URL);

[Codewalker]

Im ersten Schritt will ich nur den Quelltext haben, aber ich möchte später auf Formulare etc. zugreifen können und auch ein Login eingeben können. Daher dachte ich an den EmbeddedWB.