zwar wurde sowas schon 100x durchgekaut aber okay
nimm
indy komponenten!!!
Delphi-Quellcode:
Uses
IdHTTP;
// [...]
PROCEDURE Klick;
VAR Lines: TStrings; XIdHTTP:TIdHTTP;
BEGIN
Lines := TStringList.Create;
XIdHTTP := TIdHTTP.Create(Application.Owner);
XIdHTTP.AllowCookies := FALSE;
Lines.Add('name=post'); // hier erst den Button Namen dann die Sendemethode (post/get)
Form1.RCheck.Lines.Text := XIdHTTP.Post('http://google.de',Lines); // hier noch die genaue Webseite eintragen!!!
Lines.Free;
XIdHTTP.Free;
END;
Lass den Button Namen einfach mal leer vllt. klappts, wenn nicht einfach bischen probieren....
Mit dem Webbrowser geht das zwar auch ist aber deutlich langsamer:
- erst zur webseite navigieren, warten bis geladen und dann...
Delphi-Quellcode:
IF WebBrowser.OleObject.Document.forms.Length > 0 // prüfen ob überhaupt formular vorhanden
THEN BEGIN
WebBrowser.OleObject.Document.forms.item(0).elements.item(0).click; // hier musst du jetzt wissen auf welchem formular, einfach bischen testen...
END;
Und zack hat man ein Programm was für einen im Internet täglich votet, aber du musst wissen sowas ist betrug und verboten...