CPort - OnRxChar tritt nur genau zwei Mal auf

[hirnstroem]

'loha Folks,

in einem meiner Projekte will das OnRxChar Eregnis (tritt auf sobald ein Paar Zeichen empfangen werden) nicht mehr bzw. nur noch genau zwei Mal auftreten und ich frage mich ernsthaft, was man eigentlich tun muss, damit dem so ist. Dieses nur zwei Mal bezieht sich auf die Situation, welche direkt nach dem kompilieren und anschliessendem Aufstarten der Applikation vorherrscht.

Beim Aufstarten mache ich folgendes:

Delphi-Quellcode:

  CAN232Device.CAN_RATE := CAN_RATEItemIndex;
  CAN232Device.CAN232_RATE := CAN232_RATEItemIndex;
  CAN232Device.CAN_POLL_RATE := 100 ;//ADODataSet_BusParameter.FieldByName('ACommandPollRate').Value;
  CAN232Device.Initialized := True;

  // COM Port section
  with ComPort do
  begin
    Port := ADODataSet_BusParameter.FieldByName('COMPort').Value;
    BaudRate := StrToBaudRate(ADODataSet_BusParameter.FieldByName('BaudRate').Value);
    DataBits := StrToDataBits('8'); //StrToDataBits(ADODataSet_BusParameter.FieldByName('DataBits').Value);
    StopBits := StrToStopBits('1'); //StrToStopBits(ADODataSet_BusParameter.FieldByName('StopBits').Value);
    Parity.Bits := prNone;
    FlowControl.FlowControl := fcNone;

    Open;
    Connected := True;

    WriteStr(#13);      // Clear out CAN232 Buffer.
    WriteStr('C'+#13);  // Close CAN232
    WriteStr('S' + IntToStr(CAN232Device.CAN_RATE) + #13);
    WriteStr('U' + IntToStr(CAN232Device.CAN232_RATE) + #13);
    WriteStr('O'+#13);  // Open CAN232

Es werden ein Paar Einstellungen aus einer Datenbank ausgelesen und übernommen. Von nun an bleiben die COMPort Einstellungen unberührt. Das heisst der Port ist ständig geöffnet (weil ich ständig damit rechnen muss, dass irgendetwas empfangen wird, ein Bild eines Gerätes welches Zutritte kontrolliert beispielsweise).

Nun kann ich einen Befehl an ein über einen CAN-Bus angeschlossenes Gerät senden, wenn das Gerät den Befehl kennt, schickt es mir eine Antwort und schaltet z.B. ein Relais und ein Fenster im Gebäude öffnet sich. Die Antwort sollte nun ja eigentlich ein OnRxChar Ereignis auslösen, tut es auch. Wiederhole ich allerdings dieses Spielchen ein zweites mal, höre ich zwar das Relais schalten, das OnRxChar Ereignis tritt aber nicht auf.

Hat jemand eine Idee wieso dem so ist?

Grüsse
hirnstroem