automaticly send large data as packages

2020-06-09 09:35:06 +02:00
parent 6e33874df6
commit bf77505f42
3 changed files with 112 additions and 26 deletions
--- a/Pilz.Networking/TCPManager.vb
+++ b/Pilz.Networking/TCPManager.vb
@@ -23,9 +23,6 @@ Public Class TCPManager
        End If
    End Sub

-    ''' <summary>
-    ''' Stop listening on given port.
-    ''' </summary>
    Public Overrides Sub [Stop]()
        If IsListening Then
            IsListening = False
@@ -33,6 +30,10 @@ Public Class TCPManager
        End If
    End Sub

+    Protected Overrides Function GetBufferSize() As Integer
+        Return BufferSize
+    End Function
+
    Private Sub CheckRetriveData()
        Do While IsListening
            If listener.Pending Then