Ich habs jetzt mit dem TWebBrowser.Busy probiert... Funktioniert einwandfrei
Delphi-Quellcode:
webbrowser_fmcall.Navigate(strl_urlfmcall.Text);
While (webbrowser_fmcall.Busy) And Not (Application.Terminated) Do
Begin
Sleep(50);
Application.ProcessMessages;
End;
strl_datafmcall.Clear;
varContent := webbrowser_fmcall.Document;
If webbrowser_fmcall.LocationURL <> '' Then
Begin
strl_datafmcall.Text := varContent.Body.OuterHTML
End Else
Begin
strl_datafmcall.Text := 'Error...';
End;
Danke für den Tipp!