delphi 从数组中任取一个,例如从1至9随机取一个数进行付值。答:;const Arr:array[1..10] of string[11]=('13622220001', '13622220002','13622220003','13622220004', '13622220005','13622220006','13622220007', '13622220008','13622220009','13622220010');var i:integer;begin Randomize; i := Trunc(10 * Random + 1); ShowMessage(...