1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

 Quellcode:=TstringList.Create;
 Quellcode.Add(Browser.OleObject.Document.Forms.item(0).Document.Body.OuterHtml);

 For i:=0 to Quellcode.count-1 do
  Begin
   If Pos('uiReboot()',Quellcode.Strings[i])>0 then
    Begin
     ovElements := Browser.OleObject.Document.forms.item(0).elements;
        for i2 := 0 to (ovElements.Length - 1) do
        Memo1.lines.add((ovElements.item(i2)).value+'NR:'+inttostr(i2));
        
     Browser.OleObject.Document.forms.item(0).elements.item(3).click;
end;					

1:
2:
3:
4:
5:
6:
7:

<P>Klicken Sie hier, wenn Sie FRITZ!Box neu starten wollen. Die Anrufliste und die Ereignisse werden beim Neustart zurückgesetzt. Alle anderen Einstellungen bleiben erhalten.</P>
<P style="TEXT-ALIGN: center"><INPUT class=Pushbutton style="WIDTH: 360px" onclick=uiReboot() type=button value="FRITZ!Box neu starten"></P></DIV>
<DIV class=pDialog>
<P>Klicken Sie hier, wenn Sie FRITZ!Box neu starten und in den Auslieferungszustand zurücksetzen wollen. Alle individuellen Einstellungen werden gelöscht.<BR>Vorsicht! Wenn Sie eine individuelle IP-Konfiguration oder einen individuellen WLAN-Netzwerkschlüssel benutzen, müssen Sie die Netzwerkeinstellungen Ihres Computers anpassen, um nach dem Zurücksetzen wieder auf FRITZ!Box zugreifen zu können.</P>
<P style="TEXT-ALIGN: center"><INPUT class=Pushbutton style="WIDTH: 360px" onclick=uiRestoreFactoryDefaults() type=button value="FRITZ!Box neu starten und Werkseinstellungen laden"></P></DIV>
<DIV class=pButtonbar><INPUT class=Pushbutton onclick=uiDoHelp() type=button value=Hilfe> </DIV></DIV></DIV></TD>
<TD class=Schattenrechts></TD></TR>					

1:
2:
3:
4:
5:
6:
7:
8:

For i:=0 to Quellcode.Count-1 do
  Begin
  //Wenn Login erscheinen sollte
  If Pos('login:command/password',Quellcode.Strings[i])>0 then
   Begin
   Browser.OleObject.Document.Frames.item('frame_content').Document.forms.item(1).elements.item(0).value:='serveradmin';
   Browser.OleObject.Document.Frames.item('frame_content').Document.forms.item(1).elements.item(1).click;
   End;