B4J Question Automatically sending bytes via serial port after program startup

[BogdanU]

Hello,
Here's my RS232 terminal. I want it to send the value of a counter variable over RS323 every 1000 ms. I don't know how to do this. Here's my latest attempt.

'--- Timer1_Tick for testing only
Sub Timer1_Tick
    counter = counter + 1
    txtInput.Text = counter & Chr(10) & Chr(13)
End Sub

best regards
Bogdan

 

[Erel]

Sub Timer1_Tick
    counter = counter + 1
    astream.Write(counter & Chr(10) & Chr(13))
End Sub

 

[BogdanU]

astream.Write(counter & Chr(10) & Chr(13))

Many thanks, Erel

best regards
Bogdan