URL aufrufen und POST ausführen

[mohikaner13]

Die Anfrage hat sich erledigt,

ich habe es jetzt doch mit der oben beschriebenen Indy-Komponente gemacht. Der Quelltext hat auf Anhieb aber nicht geklappt, da er in der übergebenen URL hinten immer noch ein "leeres" '&' anfügt. Das wird von dem Webserver meiner Webcam (RoboCam) aber nicht akzeptiert. Ich habe den Code also abgeändert, so dass er kein abschließendes '&' mehr übergibt (vielleicht nicht elegant, aber funktioniert

Delphi-Quellcode:

...
 //Dieser Stream wird letztendlich gesendet
    //Stream mit Werten füllen
 
    for I:=0 to aParams.Count-1 do
      begin
      lParams.WriteString(aParams[I] + '&');
      end;

    Text := copy(lParams.Datastring,0, length(lParams.Datastring)-1);
    lParams.WriteString(Text);

    try
      //Stream an das PHP-Script senden
      AHTTP.Post(AtoURL,
                 lParams,
                 lStream);
    except
      on E: Exception do
        showmessage('Fehler bei der Übertragung: ' + E.Message);
    end;
    SetLength(Result,lStream.Size);
    lStream.Position:=0;
    lStream.ReadBuffer(Result[1],lStream.Size);
...

Gruß, Jörg Hemmerling



Erste Anfrage (überholt):

Hallo,

ich suche eine ebensolche Lösung. (Nachdem ich nun das Bild meiner Webcam laden kann, will ich diese auch noch steuern können) Kann man den Post-Befehl nicht auch "einfach" als Text senden - nichts anderes sind doch die Daten, welche über http gesandt werden - oder?

Das müsste dann doch auch mit Delphi-Bordmitteln gehen?

Hat das schon mal jemand gemacht?
Ich werds mal versuchen - welche Daten (Header, Daten, usw) sollte ich ja mit einem sniffer rauskriegen können.

Nur - an welche Schnittstelle sende ich die dann? (Ich vermute mal über netsocks an die IP-Adresseort - richtig?)

Danke.