Hey!
Ich bin gerade mit meinem Latein am Ende:
Ich möchte über TCP/IP mit dem PC kommunizieren. Verbindungsaufbau klappt auch:
Bei erfolgreichem connect initialisiere ich das ASyncStreams-Objekt wie folgt:
AStreams.Initialize(Socket1.InputStream, Socket1.OutputStream, "AStreams")
Der Datenversand von Handy zu PC funktioniert auch.
Allerdings wird scheinbar das NewData-Event überhaupt nicht ausgelöst,
Denn nicht einmal der Text "Daten empfangen" wird angezeigt.
Testweise habe ich dann AStreams.InitializePrefix aufgerufen. Dann stürzt die Anwendung ab, wenn ich Daten vom PC aus sende. Also scheinen die Daten schon anzukommen.
Hat jemand eine Idee?
Ich bin gerade mit meinem Latein am Ende:
Ich möchte über TCP/IP mit dem PC kommunizieren. Verbindungsaufbau klappt auch:
Bei erfolgreichem connect initialisiere ich das ASyncStreams-Objekt wie folgt:
AStreams.Initialize(Socket1.InputStream, Socket1.OutputStream, "AStreams")
Der Datenversand von Handy zu PC funktioniert auch.
Allerdings wird scheinbar das NewData-Event überhaupt nicht ausgelöst,
B4X:
wenn der Socket Daten erhält.
Sub AStreams_NewData (Buffer() As Byte)
newtext = "Daten empfangen."
CallSub(main,newtext)
Dim msg As String
msg = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
newtext = msg
CallSub(main,newtext)
End SubDenn nicht einmal der Text "Daten empfangen" wird angezeigt.
Testweise habe ich dann AStreams.InitializePrefix aufgerufen. Dann stürzt die Anwendung ab, wenn ich Daten vom PC aus sende. Also scheinen die Daten schon anzukommen.
Hat jemand eine Idee?