как узнать что страница в WebBrowser загружена

[designer999]

Здравствуйте
как узнать что страница в WebBrowser загружена ?
(То есть когда окончательно сайт загрузился в браузере)

[Pedro]

Есть событие OnDocumentComplete

[designer999]

а как его использовать ?
я использую такой код для заполнения полей, но если страница не загружена до конца то код не работает, то есть нужно как то определить в процессе загружен ли сайт или нет

procedure TForm1.Button2Click(Sender: TObject);
var c:integer;
begin

for c:= 0 to Memo1.Lines.Count - 1 do
 begin
webbrowser1.Navigate(''+Memo1.Lines[c]);

begin
    html_tag:=WebBrowser1.OleObject.Document.forms.item(0).elements;
 for i:=0 to (html_tag.length-1) do


//--------------1
  if (html_tag.item(i).name='username') then
 html_tag.item(i).value:='******';

//--------------2
  if (html_tag.item(i).name='password') then
 html_tag.item(i).value:='******';

//--------------3
 if (html_tag.item(i).value='Login') then
 begin html_tag.item(i).click;   end;


end;

end;
end;

как это сделать ?