日语大一考试考什么:在delphi中怎样把string类型的值逐个赋到数组?