string类型如何向array付值(100分)

A

aefhh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-06

• #1

str:string;
ch:array[0.1023] of char;
begin
str:='test';
ch:=test;//错误
end;

 

Y

yeath

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-06

• #2

ch[1] := str[1];
ch[2] := str[2];
可以做个循环

 

一

一只没有缺点的狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-06

• #3

用个最傻的办法，循环赋值吧：
str:string;
ch:array[0.1023] of char;
i:integer;
begin
str:='test';
ch:=test;//错误
for i:=1 to Length(str) do ch[i-1]:=str;
end;
够傻吧！

 

J

JohnsonGuo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-06

• #4

Move(str[1], ch[0], Length(str));

 

A

aefhh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-06

• #5

多人接受答案了。