MSCOMM参数设置过程

//以下是创建窗体时的MSCOMM参数设置过程

//MSComm1.InputMode := comInputModeBinary;

//和MSComm1.InputMode := comInputModeText;

//实验结果基本对Delghi不太起作用

procedure TForm1.FormCreate(Sender: TObject); var   str: string; begin //MSCOMM参数设置   MSComm1.CommPort := 1;//使用COM1   MSComm1.Settings := ''9600,N,8,1'';//设置通信口参数   MSComm1.InBufferSize := 32;//设置MSComm1接收缓冲区为32字节   MSComm1.OutBufferSize := 2;//设置MSComm1发送缓冲区为2字节   MSComm1.InputMode := comInputModeBinary;//设置接收数据模式为二进制形式   MSComm1.InputLen := 1;//设置Input 一次从接收缓冲读取字节数为1   MSComm1.SThreshold := 1;//设置Output 一次从发送缓冲读取字节数为1   MSComm1.InBufferCount := 0;//清除接收缓冲区   MSComm1.OutBufferCount := 0;//清除发送缓冲区   MSComm1.RThreshold := 1;//设置接收一个字节产生OnComm事件   MSComm1.PortOpen := true;//打开串口1 /   Buffers := '''';   CheckSum := 0; //发送串口命令   Command := 34;   str := ''$'' + #2 + #$22 + #1;//读MP3总曲目   str := s