Warum funktioniert dieser Code nicht bei diesem Inputfeld?

[richard_boderich]

Hallo Delphianer!

Kann mir jemand sagen, warum sich in dieses Html Inputfeld kein Text eintragen lässt? Habe schon im Forum nachgeschaut und diverse Codesequenzen getestet - keiner hat funktioniert! bin momentan etwas ratlos.

mfG Richard

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  WB.Navigate('http://www.virustotal.com/de');
  while (WB.ReadyState <> READYSTATE_COMPLETE)
    and not (Application.Terminated) do
  begin
    Application.ProcessMessages;
    Sleep(0);
  end;
  WB.OleObject.document.forms.item(0).elements.item('archivo').value:='C:\test.txt';
  //WB.OleObject.document.forms.item(0).submit();

end;