|
Registriert seit: 26. Jan 2011
339 Beiträge
Delphi 12 Athens
|
AW: Rs232
11. Apr 2016, 13:05
Es gibt kein Ende-Zeichen und die Länge ist auch nicht bekannt.
So siehts aus:
var s: AnsiString
SetLength(s, InQueue);
ReadFile(FComHandle, s[1], Length(s), result, @Overlapped);
GetOverlappedResult(FComHandle, Overlapped, result, True);
Das ganze wird halt x-mal wiederholt bis der Timeout (GetTickCount ...) abgelaufen ist.
|