线程内的TComPort

Question

如何在线程内部（例如OTL或Jedi线程）使用TComport来捕获传入的字符串？什么＆＃34; SyncMethod＆＃34; TComport实际上呢？ 这是我的代码：

procedure TForm5.ComPort1RxChar(Sender: TObject; Count: Integer);
var
  Str:string;
  commapos:integer;
begin
  ComPort1.ReadStr(Str, Count);
  commapos:=System.Pos(',',str);
  if (commapos>0) then
    // Do Something
  else
    // Do Something else
end;

上述问题可以通过TurboPower Async Pro实现更好的故障恢复吗？

提前致谢。

P.S。必须使用后台工作程序从ComPort读取传入的字符串。