Tcomport on RXChar Problem

[PhilmacFLy]

Moin DPler
Ich habe folgendes Problem, ich bekommen über einen virtuellen Comport Daten zu gesendet mit 115200 Baud. Nun wollte ich mit dem OnRxChar event der Komponente arbeiten. Nur leider feuert die keine Events. Wenn ich aber über einen Timer

Delphi-Quellcode:

procedure TForm2.Timer1Timer(Sender: TObject);
var
  Str: String;
begin
  ComPort1.ReadStr(Str, 10);
  if str <>'' then
  memo2.Lines.Add(stringtohex(str));
end;

die Daten ausles, ist was da.
Jemand eine Idee woran das liegen könnte?