Aus Indy 10 Webserver einen Thread starten ???

**Supergr**

Hallo Zusammen,

ich versuche mich gerade an einem kleinen Webserver für eine Datenbankabfrage. Da der Webserver "Multitasking" fähig ist muss ich die Datenbankabfrage in einem Thread verbuchen.

Jetzt finde ich nicht wirklich sinnvolle Infos wie ich das genau anstellen muss...
Die Anfragen kommen als body im JSon Format rein und sollen auch als JSON in der ResponseInfo wieder raus.

in der IdHTTPServer1CommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo); kommen ja vom Server alle Daten an.

Wie bekomme ich die Sinnvoll in meinen Thread übergeben und vor allem die AResponseInfo wieder zurück?
ist denn wenigstens die CommandGet Routine (mit CreatePostStream & DoneWithPostStream) Threadsave ??

hier die einfache CommandGet Routine. Also wie übergebe ich die Daten an den Thread und wie bekomm ich die passende Antwort für den dazugehörigen IDContext?
Hat das schon mal jemand erfolgreich

erledigt... ?

markieren

Code:

			  
procedure TAct2DDM.IdHTTPServer1CommandGet(AContext: TIdContext;   ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);

var

   Stream : TStream;

   sr : TStreamReader;

begin

  If ARequestInfo.CommandType = hcPOST then

  begin

    Stream := ARequestInfo.PostStream;

    SR := TStreamReader.Create(Stream);

    if Assigned(Stream) then

    begin

    try

        while not SR.EndOfStream do

        begin

          s:= s + SR.ReadLine;

        end;

     SR.Free;

     finally

    end;

    end;

    try

      Access := _Json(s);

      meinThread;

    except

    end;

  AResponseInfo.ContentType := 'applicaton/json';

  AResponseInfo.ResponseNo  := iResponse;

  AResponseInfo.CharSet     := 'utf-8';

  AResponseInfo.ContentEncoding := 'utf-8';

  AResponseInfo.ContentText := (meinThread_Antwort);

end;

Vielen Dank für die Umgehung meine Gehirnbremse

Stevie

Aus Indy 10 Webserver einen Thread starten ???

Aus Indy 10 Webserver einen Thread starten ???

Stichworte

Forumregeln