Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Mscomm Zeilenumbruch
Autor: Frank
Datum: 23.01.03 12:48
Also, entlich habe ich eine lösung gefunden für mein Problem, für alle gleichgesinten die sich mit Mscomm auseinander setzen, hier der Quellcode um daten von einer seriellen Schnittstelle mit Zeilenumbruch anzuzeigen: Private Sub MSComm1_OnComm() Static srx As String Dim cx As String Select Case MSComm1.CommEvent Case comEvReceive ‘Receive buffer has at least 1 byte Do While MSComm1.InBufferCount > 0 cx = MSComm1.Input 'Get one byte Select Case cx Case Chr(13) ‘<CR> packet terminator TnetInput srx ‘process packet srx = "" ‘reset packet buffer MSComm1.Output = Chr(6) 'send <ACK> Case Chr(10) 'ignore <LF> terminators Case Else srx = srx & cx ‘capture packet bytes End Select Loop Case Is > 1000 ‘detected port error ComError MSComm1.CommEvent End Select End Sub weiteres unter: http://www.computerwise.com/appnotes/an0108.pdf Grüsse

Mscomm Zeilenumbruch	171	Frank	23.01.03 10:25
Re: Mscomm Zeilenumbruch	41	Mr. NoName	23.01.03 11:33
Re: Mscomm Zeilenumbruch	45	Frank	23.01.03 12:48

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen