怎样给数组赋初值?
我定义了一个数组:
StreamArray : Array[0..9] of TMemoryStream;
我想给数组先赋个为空的初如值,该怎样赋呢?
当数组里有了值之后,我又怎样清空数组的值呢?
问题点数：20、回复次数：7Top
1 楼Marxl（千里马）回复于 2002-03-05 14:13:52 得分 0
可以用循环语句给数组赋值。Top
2 楼cul（恐龙++）回复于 2002-03-05 14:17:38 得分 0
有没有不用循环可以赋值的?Top
3 楼wr960204（武稀松）回复于 2002-03-05 14:26:11 得分 0
你的数组是对象数组,好像不能直接赋值吧？
Top
4 楼genphone_ru（哎，什么都要学，真累）回复于 2002-03-05 14:27:50 得分 5
FillChar(StreamArray,SizeOf(StreamArray),0);Top
5 楼quark（夸克）回复于 2002-03-05 14:30:21 得分 0
只能用循环，除非另有一个数组：Array1 := Array2Top
6 楼newyj（吴刚ｖｓ西西弗）回复于 2002-03-05 14:34:36 得分 15
赋空
for i:=0 to 9 do
StreamArray[i] := nil;
初始化
for i:=0 to 9 do
StreamArray[i] ：= tmemorystream.create;
清空
for i:=0 to 9 do
begin
StreamArray[i].free
StreamArray[i] ：=nil;
end;Top
7 楼vcshcn（黑天的猩猩）回复于 2002-03-05 14:38:34 得分 0
有一种在声明的时候付值的方法，象c一样，不过我忘了
zeromemory(@arr,sizeof(type)*num)Top
