Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7:
| procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.OleObject.document.forms.item(0).elements.item('benutzername').value:=Edit1.Text; WebBrowser1.OleObject.document.forms.item(0).elements.item('passwort').value:=Edit2.Text; WebBrowser1.OleObject.document.forms.item(0).submit;
end; |
so da kannste dann 2 Edit felder machen
Edit1 und Edit2
und die werden dann da rein geschrieben
und bei button klick loggt das system sich ein
du kannst natürlich auch einfach
statt
Delphi-Quelltext
auch einfach direct den namen nehmen dann loggt es sich automatisch ein weisste wie ich mein
Delphi-Quelltext
1: 2:
| Value:= 'dein besnutzername'; Value:= 'dein passwort'; |
joa
habs noch nicht probiert aber könnte gehn
