运行出现[警告]Variable 'buffer2' might not have been initialized怎么回事？

Question

procedure TForm1.MSComm1Comm(Sender: TObject); //处理事件
var
  s:Variant;
  buffer3:array of byte;
  i:integer;
   begin
      i:=0;
      s:=VarArrayCreate([0,0], varByte);
          for i:=0 to 10 do
          begin              s:=MSComm1.Input ;
              buffer3[i]:=s[0];
          end;
     end;

Answer 1

var
  s: Variant;
  buffer3: array of byte;
  i: integer;
begin
  i := 0;
  SetLength(buffer3, 10);//++加上，你没有初始化buffer3!
  s := VarArrayCreate([0, 0], varByte);
  for i := 0 to 10 do
  begin
    s := MSComm1.Input;
    buffer3[i] := s[0];
  end;
end;

Answer 2

没初始化buffer3SetLength(buffer3,11);