如何清空数组，并使长度置为0

Question

ReceiveList: array of byte;
SetLength(ReceiveList,1);  
ReceiveList[0]:=$30;
我付给一些之后，要清空，并且长度设置0.
怎么处理啊
我直接 SetLength(ReceiveList,0); //出现异常，一个异常。。

Answer 1

var   
      S:   array[0..79]   of   char;   
  begin   
      {   Set   to   all   spaces   }   
      FillChar(S,   SizeOf(S),   Ord('   '));   
  end;
简单一点就直接Receivelist：=   nil;

Answer 2

我试过了，不出错的。procedure TForm1.Button1Click(Sender: TObject);
var
ReceiveList: array of byte;beginSetLength(ReceiveList,1);
ReceiveList[0]:=$30;
 SetLength(ReceiveList,0);
end;不知你的是什么问题。

Answer 3

内存紊乱，，我多次赋值，多次 SetLength(ReceiveList,0)

Answer 4

这样是不行的，既然用了SetLength(ReceiveList,0),ReceiveList的长度就是零，你再对它赋值操作，肯定是要出错的。

Answer 5

还有，数组array of byte;的拷贝也经常出问题，，还是直接一个一个值的负给他比较保险