B4J Question Do While True need a exit (solved)

[bjfhs]

My code

Private Record As Thread
Record.Initialise("Rec")
Record.Start(Null,"Recording",Null)

Public Sub sendM(Data() As Byte)
    udpsock_Send(udpsock,Data,"192.168.0.108",1234)
End Sub

Sub udpsock_Send(socketa As UDPSocket,Data() As Byte, ipaddress As String, port1 As String)
    Dim Packet As UDPPacket
    Packet.Initialize(Data, ipaddress, port1)
    socketa.Send(Packet)
End Sub

Sub Recording
    Dim BytesRead As Int = 0
    Dim RecDataSize As Int = AR.BufferSize/5
    Dim RecData(RecDataSize) As Byte
    Do While True
      If RecordRunning Then
         BytesRead = AR.Read(RecData,0,RecData.Length)
        sendM(RecData)
        End If
    Loop
  
End Sub

I get error

Compiling generated Java code.    Error
B4J line: 97
sendM(RecData)
javac 1.8.0_211
src\b4j\example\main.java:161: Error: unreachable statement
;
^
1 error

 

[bjfhs]

I have solved it , In the loop need a exit.

 

[techknight]

You also need a Sleep or something in there, as that Do While True will lockup the main thread.

 

[bjfhs]

You also need a Sleep or something in there, as that Do While True will lockup the main thread.

Thank you for your reply,My code is in a new thread,So it can't lockup the main thread.