数组复制(5分)

  • 主题发起人 主题发起人 zjknight
  • 开始时间 开始时间
Z

zjknight

Unregistered / Unconfirmed
GUEST, unregistred user!
两个动态数组,结构相同,长度不同.
ary1: array of string;
ary2: array of string;

setlength(ary1,100);
setlength(ary2,10);

现在要把ary2中的内容复制到ary1中的指定位置,或把ary1指定位置中的内容复制到ary2中,有什么现成的函数可用吗?

还有,string类可不可以超过255个字符的?(不是指AnsiString)
 
ary2[0] := ary1[10];
ary2[9] := ary1[2];
 
单个附值
 
方法是可行,就是拙了点.

我要是二维数组呢,代码都写到手酸.
 
要求很 BT,实现方法当然也拜托不了 BT 了!
 
实际应用中
ary1: array of array of string;
ary2: array of array of string;

setlength(ary1,100,13);
setlength(ary2,10,13);
也要单个赋值吗?
有没有简单的办法?
 
strcopy
copymemory
 
搞个循环嘛
 
ShortString不能超过255
String在不同情况下代表不同的String
{$H-}
S:String;//S是ShortString
{$H+}
....//AnsiString
默认是AnsiString
 
使用Copy 可以复制
B:=Copy(A,X,Y);//B为目的数组,A为源数组,X为从A的第X位开始复制,Y为复制的个数
 
报错说:不兼容类型.

我A与B的结构是一样的,只是长度不同而已,且是二维数组,能COPY吗?
 
type
TP=array of string;
var a,b:TP;
begin
a:=b;
b:=a;
a:=b;
b:=a;
a:=b;
end;
 
帮顶!

http://www.source520.com

站长开发推广同盟 站长朋友的终极驿站
同时拥有海量源码电子经典书籍下载

http://www.source520.com/search/search.asp

"编程.站长"论坛搜索引擎-----为中国站长注入动力!
 
我看也只有搞循环了,没办法.
 
后退
顶部