Delphi XE5 Android Entwicklung: HTTP Request senden

[hacki]

Hallo,

ich bekomme beim Aufruf der TidHTTP - Post Anweisung immer eine Exception:

Code:

Socket Fehler #10013 Zugriff verweigert

Die URL scheint nicht aufgerufen worden zu sein, jedenfalls kann ich diesen Aufruf am Zielgerät (Microcontroller) nicht erkennen.

Habe leider keine Idee, woran das liegen kann.

Mein Coding sieht folgendermaßen aus:

Code:

procedure TForm1.Button1Click(Sender: TObject);
var transmission: TStringList;
    response, url: String;
begin
  transmission := TStringList.Create;

  //IdHTTP := TIdHTTP.Create( NIL );

   if button1.Caption <> 'sende Anfrage' then
   begin
     button1.Caption := 'sende Anfrage';
     transmission.Add('/?pinD1=1/?pinD2=1/?pinD3=0/?pinD4=0/?pinD5=1/?pinD6=1/?pinD7=1/?pinD8=1/?pinD9=1');
     url := 'http://192.168.178.200';

     try
      response := IdHTTP.Post( url, transmission );
     except
       on E: Exception do
        begin
          showmessage('Fehler: ' + E.Message);
          button1.Caption := 'exception';
        end;
     end;
   end
   else
    button1.Caption := 'Rollo hochfahren';

  transmission.Free;
  IdHTTP.Free;
end;

Danke für eure Unterstützung

Gruß Hacki