twebbrowser will einfach nicht warten

[pillepalle]

ich benutze derzeit folgende procedure:

Delphi-Quellcode:

procedure TseotoboForm.Wait(WebBrowser1: TWebBrowser);
begin 
while WebBrowser1.ReadyState <> READYSTATE_COMPLETE do 
begin 
  Application.ProcessMessages;
  delay(50); 
end;
end;

die hab ich hier vom forum aufgeschnappt

leider will twebbrowser einfach nicht warten, mir fällt es generell auf wenn ich ein formular per submit losschicke und durch eine langsame verbindung zum server der webbrowser versucht das nächste formular auszufüllen, welches dann natürlich noch nicht vorhanden ist

gibt es eine 100%ige lösung dafür das twebbrowser nur dann weitermachen wenn _alles_ geladen ist?