如何把Char数组的值赋给String?惭愧呀，这都不会(100分)

S

star123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #1

我想把一个Char数组的值赋给一个string,不想用循环，可是如下代码老是出错，为什么？
procedure TForm1.Button1Click(Sender: TObject);
var
S: string;
Buffer1: array[0..255] of char;
begin
FillChar(Buffer1, 100, 77);
SetLength(S, 101);
Move(Buffer1, S, 100);
ShowMessage(s);
end;

 

C

cwmdelpher

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #2

好象 S:=buffer1就可以

 

F

fsse4000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #3

很长时间没有做这个了，好像网上有这个实例，
就是类时聊天室什么的，应该有。

 

S

star123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #4

S:=buffer1也不行，运行时报错。

 

4

41426277

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #5

var
S: string;
Buffer1: array[0..255] of char;
begin
FillChar(Buffer1, 100, 77);
S:=buffer1;
ShowMessage(s);

 

S

star123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-24

• #6

是我晕了，今天怎么回事，唉！
赶紧给分。