Also ich hab hier mal einen kleinen Programmausschnitt wo sowas passiert:
Das Beispiel geht davon aus, das ein String Zeichen für Zeichen (also Byte für Byte) seriell empfangen wird und die einzelnen Bytes dann wieder zu einem String zusammengesetzt werden. Das klappt bei mir wunderbar.Code:Dim InByte as Byte Dim InString as String*24 Do InByte = inkey() 'Zeichen aus Empfangspuffer abholen If InByte <> 0 then 'wenn Zeichen vorhanden InString = InString + chr(InByte) 'Byte in entsprechenden Character umwandeln und an den String anfügen End if Loop until InByte = 0
Vielleicht hilft es dir ja weiter.
Gruß, Cairol.






Zitieren


Lesezeichen