//我在type定义一个tmyarray type tmyarray= array[0..255] of integer;
... function myfun1(a:integer):tmyarray; function myfun2(pt:array of integer):boolean;
//myfun2 要用到其它的不是tmyarray的场合,所以pt 没有用tmyarray类型; //当然把tmyarray写成array of integer也可以,但是速度有影响。 //如果不用重载,不改tmyarray,还有其它方法吗
produce ... a:integer; flag:boolean; begin .. flag:=myfun2(myfun1(a));//如何在这里实现匹配 end直接把你想要的数组定义成全局变量是不是更好一点呢. 不是,我想要的是一个函数myfun1():tmyarray 在myfun2(_)中用到了myfun1的返回数组 而myfun2的参数类型却是array of integer,不是tmyarray
不用重载,不用全局变量,又不用动态数组,好象没有办法了哦.是我的话我会选择用全局变量,呵呵 var i:integer; s:tmyarray; begin i:=..; s :=myfun1(i) ; myfun2(s); end;