怎么不可以,用两个或多个spcomm的TComm对象的实例,每个TComm对象的实例控制
一个Com口,
在下列事件中,通过判断(Sender as TComm)为那个端口并采取香油的反映嘛!
ECommsError = class( Exception );
TReceiveDataEvent = procedure(Sender: TObject; Buffer: Pointer;
BufferLength: Word) of object;
TReceiveErrorEvent = procedure(Sender: TObject; EventMask : DWORD) of object;
TModemStateChangeEvent = procedure(Sender: TObject; ModemEvent : DWORD) of object;
TSendDataEmptyEvent = procedure(Sender: TObject) of object;