Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
DANKE :bounce1:
dass man da aber auch nciht selbst draufkommt ... :wall:
PS: ich dachte einfach, wenn es sich über `...` deklarieren lässt reicht ein string :roteyes:
Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
moment, probier ich gleich mal aus^^
Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
Darüber lese ich die beiden werte aus
procedure TForm1.LocateValue;
var
c1, c2, c3 : integer;
begin
for c1 := 0 to memo2.Lines.Count - 1 do
begin
if copy(memo2.Lines.Strings, 0, 14) = '...' then
Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
Das kommt darauf an, was aus dem htmlcode ausgelesen wurde.
Das ist ja, was ich nicht verstehe, ich hab bei meinem 1. versuch für den autoeinlogger die beiden werte über
WebBrowser1.OleObject.document.Forms.item('name').elements.item('blabla').Value := lspieler;
eingegeben und er hat sie ohne kommentar mit der gleichen Loginprocedure genommen und die seite ausgeführt. Dann hab ich bemerkt,...
Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
den code der nicht funktioniert hab ich gepostet. Die Fehlermeldung kommt immer
procedure TForm1.Login;
begin
try
--> WebBrowser1.OleObject.document.Forms.item('name').elements.item(wert1).Value := lspieler; <--
WebBrowser1.OleObject.document.Forms.item('name').elements.item(wert2).Value := lpasswort;
WebBrowser1.OleObject.Document.Forms.Item('name').Submit('login');
except...
Forum: Netzwerke
Delphi
by The Madcat,
24. Aug 2006
Ich hab folgendes Problem:
Ich wollte mir einen autologin für eine hp basteln und hab dafür folgenden code benutzt:
var
lspieler, lpasswort, wert1, wert2 : string;