MSCOMM.OUTPUT问题

Question

  MSComm1.Output := memo2.Text;
   memo2.Text := inttostr(MSCOMM1.OUTBufferCount);不能这样赋值么，显示出来，memo的内容是0，就是代表outbuff里面没有字符，第一句不可行么？

Answer 1

var
outputstring:olevariant;
i:integer;
begin
  if trim(Memo2.text)<>'' then
  begin
  for i:=0 to length(trim(Memo2.text)) do
  begin
  outputstring[i]:=copy(trim(Memo2.text),i+1,1);
  end;
  MSComm1.Output:=outputstring;
  end;
end;新笔记本上没有源代码，SVN服务器挂了，从公司服务器下不下来了，大概记得代码是这样写的！或者网上搜索下，都能找到源代码