delphi中有将一个字符数组拷贝到指定数组的指定位置中的函数？(20分)

yykd_123456 · 2003-11-19

如：
a :array[0..100] of Char;
b :array[0..10] of Char;
a := '1234567890';
b := 'abcdefg';
现要将b 拷贝到 a的90到96个字符中；

zhihuali · 2003-11-19

Var
a : String;
b : String;
begin
a := '1234567890';
b := 'abcdef';
Insert(b, a, 5);
Edit1.Text := a;
end;

yykd_123456 · 2003-11-20

可我操作的是一个字符串数组而不是字符串呀!

Rudder · 2003-11-20

我这里有三款，其中一款适合你！

娃娃 · 2003-11-20

var i, j: integer;

j:=90;
for i:=0 to High(b) do
a[j+i] :=b;

lichdr · 2003-11-20

插入後，後面的還要不要，是覆蓋還是插入。
自己寫一個吧。很簡單的。

zhukewen · 2003-11-20

>>现要将b 拷贝到 a的90到96个字符中；
move(b[1],a[90],7);

诸葛白痴 · 2003-11-20

唉，可怜OO下的程序员，什么时候中国的程序员能达到真正将一个对像当成4个byte的功力呢？

yykd_123456 · 2003-11-20

接受答案了.