ActiveCommで自動受信したい


ふみ  2004-07-17 03:04:04  No: 9962  IP: [192.*.*.*]

初心者です。よろしくお願いします。

ActiveCommを使って次のプログラムをかきました。
実行すると
Olestr型からDouble型のバリアント変換はできません  
というメッセージがでます。受信する文字はASCII文字です。
どうすれば、string型にへんかんできるでしょうか。

var inputstr:string;
procedure TForm1.Port1AutoInput(ASender: TObject;
  var InputBytes: OleVariant; NumBytes: Integer);
begin
  inputstr:=inputstr+InputBytes;
  Edit1.Text:=inputstr;
end;

編集    削除