Bonjour à toutes et à tous,
J'ai écrit un petit serveur de chat basé sur les sockets Windows, sous forme de service NT. (class(TService))
Mon problème est que ce service s'arrête quand je ferme la session Windows.
Rien n'est écrit dans l'observateur d'événements, pas plus que dans mon log interne (censé tracer toutes les exceptions)
Ci-dessous le dfm du service
Quelqu'un a-t-il déjà rencontré ce problème ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 object MyNSServer: TMyNSServer OldCreateOrder = False AllowPause = False DisplayName = 'MyNetSend Serveur' Interactive = True WaitHint = 10000 OnStart = ServiceStart OnStop = ServiceStop Left = 482 Top = 305 Height = 160 Width = 171 object NSServSock: TServerSocket Active = False Port = 6805 ServerType = stNonBlocking ThreadCacheSize = 100 OnClientConnect = NSServSockClientConnect OnClientDisconnect = NSServSockClientDisconnect OnClientRead = NSServSockClientRead Left = 32 Top = 8 end end
Merci d'avance pour vos réponses
Partager