Delphi Service to Listen to TCP or UDP -


reading question: delphi windows service design, saw designer use code below in onexecute of tservice or in tthread method, in order keep service alive.

while not terminated begin   // end; 

but if need (and do) create service respond (using indy) messages sent main application in order send authentication data, do code, ignore or put sleep() in it?

indy's tidtcpserver , tidudpserver components multi-threaded, don't need use tservice.onexecute event @ all. activate them in tservice.onstart event , deactivate them in tservice.onstop event, , assign handlers tidtcpserver.onexecute , tidudpserver.onudpread events needed. both events looped you, don't need while not terminated loop in them. read/process 1 request needed, exit, , wait next event repeat. let server handle exceptions raised. , keep in mind tidudpserver has threadedevent property false default, should set true inside service.


Comments

Popular posts from this blog

How to logout from a login page in asp.net -

Stack level too deep error after upgrade to rails 3.2 and ruby 1.9.3 -