67 |
|
_Version = 393216 |
68 |
|
Protocol = 1 |
69 |
|
End |
70 |
< |
Begin VB.Label Label4 |
71 |
< |
Caption = "Label4" |
70 |
> |
Begin VB.Label Label2 |
71 |
> |
Alignment = 1 'Right Justify |
72 |
> |
Caption = "Next heartbeat:" |
73 |
|
Height = 255 |
74 |
< |
Left = 1920 |
74 |
> |
Left = 120 |
75 |
|
TabIndex = 8 |
76 |
< |
Top = 1320 |
77 |
< |
Width = 615 |
76 |
> |
Top = 480 |
77 |
> |
Width = 1455 |
78 |
|
End |
79 |
< |
Begin VB.Label Label3 |
80 |
< |
Caption = "Label3" |
79 |
> |
Begin VB.Label Label1 |
80 |
> |
Alignment = 1 'Right Justify |
81 |
> |
Caption = "Next UDP packet:" |
82 |
|
Height = 255 |
83 |
< |
Left = 1920 |
83 |
> |
Left = 120 |
84 |
|
TabIndex = 7 |
85 |
< |
Top = 960 |
86 |
< |
Width = 615 |
85 |
> |
Top = 120 |
86 |
> |
Width = 1455 |
87 |
|
End |
88 |
< |
Begin VB.Label Label2 |
89 |
< |
Caption = "Label2" |
88 |
> |
Begin VB.Label Label4 |
89 |
> |
Caption = "0" |
90 |
|
Height = 255 |
91 |
< |
Left = 120 |
91 |
> |
Left = 1680 |
92 |
|
TabIndex = 6 |
93 |
< |
Top = 600 |
94 |
< |
Width = 3375 |
93 |
> |
Top = 480 |
94 |
> |
Width = 615 |
95 |
|
End |
96 |
< |
Begin VB.Label Label1 |
97 |
< |
Caption = "Label1" |
96 |
> |
Begin VB.Label Label3 |
97 |
> |
Caption = "0" |
98 |
|
Height = 255 |
99 |
< |
Left = 120 |
99 |
> |
Left = 1680 |
100 |
|
TabIndex = 5 |
101 |
< |
Top = 240 |
102 |
< |
Width = 3375 |
101 |
> |
Top = 120 |
102 |
> |
Width = 615 |
103 |
|
End |
104 |
|
Begin VB.Label Status |
105 |
|
Caption = "Status:" |
264 |
|
responseNumber = 0 |
265 |
|
TCPSock.Close |
266 |
|
Text4.Text = Text4.Text & vbCrLf & " <closed>" |
265 |
– |
Label1.Caption = "TCP hearbeat interval: " & UDPUpdateTime |
266 |
– |
Label2.Caption = "UDP packet interval: " & TCPUpdateTime |
267 |
|
Status.Caption = "i-scream Winhost " & protocolVersion & " - got config okay" |
268 |
|
Label3.Caption = UDPUpdateTime |
269 |
|
Label4.Caption = TCPUpdateTime |