delphi怎样把多个数组赋值给一个动态数组答:procedure TForm1.rzbtbtn1Click(Sender: TObject);const arr1:array[0..8] of string=('0','1','2','3','4','5','6','7','8');arr2:array[0..8] of string=('1','2','3','4','5','6','7','8','0');var i1,i2,i3:integer;s:TStringList;arr3:array of...