URL aufrufen ohne Response

[TheSchuchii]

Guten Tag!

Ich hätte da ein Problem mit URL aufrufen in Delphi und zwar: Sind Geräte über eine HTTP-Schnittstelle ansteuerbar und diese geben ein JSON-Feld zurück. Das Problem ist, dass ich nicht auf diese Rückgabe warten will da dies zu lange dauert. Momenten werden die mit der Indy TidHTTP Komponente mit der Funktion get also str:=idHTTP.get('URL') angesprochen. Jedoch wenn mehrere Geräte auf einmal bzw hintereinander Angesprochen werden ergibt sich eine zu lange Wartezeit.
Die Möglichkeit mit ShellExcute möchte ich nicht verwenden da das Programm später Plattform unabhängig laufen sollte.

Falls die TidHTTP oder eine andere Komponente dies bereits kann finde ich die Funktion einfach nicht

[Klaus01]

.. Du könntest die Abfragen in Threads verlagern.

Grüße
Klaus

[mjustin]

Neuere Delphi Versionen enthalten die PPL (Parallel Programming Library):

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 aTask: ITask;
 ... 
begin
 aTask := TTask.Create (procedure ()
   begin
     // führe den GET Request aus
     ...
     // mach etwas mit der Response
     ShowMessage (Response);
   end);
 aTask.Start;
end;

http://docwiki.embarcadero.com/RADSt...amming_Library

[TheSchuchii]

Danke für die schnellen Antworten

Threads als Lösung sind mir bis jetzt nicht eingefallen, aber es funktioniert wunderbar

Danke nochmal!

[TurboMagic]

Andere Lösung wären ICS open source Komponenten, die arbeiten auch ohne Threads asynchron. http://www.overbyte.eu

[DieDolly]

Vielleicht habe ich ja einen Denkfehler. Aber sollte man in TTask-Tasks nicht auch mit dem Mainthread synchronisieren?
Das sage ich nur wegen dem Showmessage was unsynchronisiert ist.

[mjustin]

Zitat von DieDolly:

Vielleicht habe ich ja einen Denkfehler. Aber sollte man in TTask-Tasks nicht auch mit dem Mainthread synchronisieren?
Das sage ich nur wegen dem Showmessage was unsynchronisiert ist.

Ja, das ShowMessage muss synchronisiert werden z.B. mit TThread.Queue (http://www.malcolmgroves.com/blog/?p=1678).
Oder man hat seine eigene threadsafe Version von ShowMessage im scope

[Delphi.Narium]

Statt idhttp.get(Url) idhttp.head(url) nehmen?