一个简单的问题，谢谢！

Question

在窗体中定义了一个Edit1，将Edit1.Text：＝'abcde'；
现在我想用一个数组m：array[1..100]of string来读取Edit1.Text的内容，
要如何读取？比如我想使m[1]='a',m[2]='b',m[3]='c',m[4]='d',m[5]='e'，
具体怎么操作，谢谢！

Answer 1

str:string;
str:=Edit1.text;
ary:array[1..100] of string;
for i:=0 to length(str) do
begin
 array[i]:=str[i];
end;

Answer 2

for i:=1 to length(Edit1.text) do
  m[i]:=Edit1.text[i];

Answer 3

for i:=1 to length(Edit1.text) do
  m[i]:=Edit1.text[i];

Answer 4

for i:=1 to length(Edit1.text) do
  m[i]:=Edit1.text[i];