Delphi用的SPCOMM

附加檔案：4e48704735931_spcomm.rar

我在Delphi-XE以後的版本,
spcomm, 無法正常的對COM收發資料??
不知道怎麼改,
有沒有高人, 可以改一個新的版本spcomm for XE

稍微改一下就可以了. 不知道如何上傳.... 有以下修改: 
1. uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs;
2. PChar-> PAnsiChar (除了開啟COM Port 的那個指令, 改到也沒關係, build 會有錯誤)
3.讀取時要指定AnsiString, 或用Byte讀取

procedure TForm1.Comm1ReceiveData(Sender: TObject; Buffer: Pointer; BufferLength: Word);
var S:AnsiString;
begin
SetLength(S,BufferLength);
Move(Buffer^,PChar(S)^,BufferLength);
Memo1.Lines.Add(S);
end;

編輯記錄