Also das ist in alles in einer Komponente von unserer Firma. Daher nur der Ausschnitt oben...
Das Event ist nur eine Eigenschaft der Kompo aber die steht standardmäßig auf EV_RXCHAR.
Ich habe dann nur noch ein Thread außenrum, der zyklisch prüft, ob sich auf der Schnittstelle was tut...
Delphi-Quellcode:
if GetCommModemStatus(SerHandle, nStatus) then
begin
if ((nStatus and MS_CTS_ON) > 0) or
((nStatus and MS_DSR_ON) > 0) or
((nStatus and MS_RING_ON) > 0) or
((nStatus and MS_RLSD_ON) > 0) then
Result := True;
end;
Selbst wenn ich Zyklisch im Thread das oben aufrufe, ist Result immer False...
Mehr benutze ich nicht.
Viele Grüße
Alex