Web forum is in read-only mode. Login as active registered customer for write access
  Forum Search   New Posts New Posts

TMS All, especially Business

 Post Reply Post Reply
Author
Kaeswurm Thomas View Drop Down
Member
Member
Avatar

Joined: 24 Jul 2014
Posts: 87
Post Options Post Options   Quote Kaeswurm Thomas Quote  Post ReplyReply Direct Link To This Post Topic: TMS All, especially Business
    Posted: 30 Mar 2020 at 9:31am
Is it possible, to name all threads you use?
The Delphi TThread Method NameThreadForDebugging('TMS_Thread_Name') would do this.

I have a current problem which I want to debug. Can you tell me the position in Sparcle/XData where can I do this right now? (I use the REST Server)
Back to Top
Wagner R. Landgraf View Drop Down
TMS Support
TMS Support
Avatar

Joined: 18 May 2010
Posts: 2888
Post Options Post Options   Quote Wagner R. Landgraf Quote  Post ReplyReply Direct Link To This Post Posted: 30 Mar 2020 at 5:27pm
One good place to do so is using the middleware. Just add a generic middleware to your module, call NameThreadForDebugging and then forward the request in the chain using Next(Context).

procedure TForm4.XDataServer1GenericRequest(Sender: TObject;
  Context: THttpServerContext; Next: THttpServerProc);
begin
  TThread.NameThreadForDebugging(SomeName);
  Next(Context);
end;

Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down