Discussion :

[amine_taz]

Bonjour à tous.
Dans le but de créer un serveur qui écoutera les requêtes des clients, les traitera, et renverra les réponses, je dois utiliser un timer qui vérifiera périodiquement les demandes de connexions. le problème est que le serveur doit être installé en tant que service Windows et les timers habituels ne fonctionnent pas dans un service. Après des recherches j'ai trouvé que sous VB.net il faut utiliser des System.Timer. y a-t-il un équivalent à cela en PB ?
Merci.

[<nico>]

Voici un code qui crée un timer qui n'est pas associé à une fenêtre window:

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
25
26
27
28
29
30
Global IDTimer.i
 
Procedure TimerProc(Hwnd.l, uMsg.l, idEvent.l, dwTime.l)
  Select uMsg
    Case #WM_TIMER
      Select idEvent
        Case IDTimer
          Debug "timer"
      EndSelect
  EndSelect
EndProcedure
 
 
If OpenWindow(0,0,0,600,300,"WebGadget",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
Voici un code qui lance un timer qui n'est pas associé à une fenêtre window:
 
  IDTimer = SetTimer_(0, 1, 1000, @TimerProc())
 
  ; pour fermer un timer:
  ; KillTimer_(0, IDTimer)
 
  Repeat
    Event=WaitWindowEvent()
    Select Event
      Case #PB_Event_CloseWindow
        quit.l = 1
    EndSelect
 
    Until quit = 1
EndIf