move能将数组A一次性复制到另一数组B，但如何将A数组复制到B数组的指定位置？(30分)

C

chenzy89

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-28

• #1

a,b: array[1..4] of char;
move(a,b,sizeof(b));
move能将数组A一次性复制到另一数组B。我有个问题如下：
a: array[1..4] of char;
b: array[1..8] of char;
如何将A数组复制到B数组的指定位置(比如5)？难道非得用循环语句才行？

 

L

luzhouman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-28

• #2

var
a: array[1..4] of char;
b: array[1..8] of char;
begin
FillChar(a, SizeOf(a), 'A');
FillChar(b, SizeOf(b), 'B');
Move(a, b[5], 4);

ShowMessage(b);

end;

 

J

japhe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-28

• #3

再给个方法
CopyMemory

var
a: array[1..4] of char;
b: array[1..8] of char;
begin
FillChar(a, SizeOf(a), 'A');
FillChar(b, SizeOf(b), 'B');
//Move(a, b[5], 4);
CopyMemory(@b[5], @a, 4);
ShowMessage(b);
end;

 

C

chenzy89

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-29

• #4

非常感谢以上两位的回答！