首页 > 其他 > 详细

function Slice

时间:2015-05-15 15:21:41      阅读:94      评论:0      收藏:0      [点我收藏+]
 function Slice ( SourceArray : array; Count : Integer ) : array;

描述:Slice函数从源数组SourceArray中第一个元素开始,共Count个元素,创建成一个子数组。

这个子数组只能用于作为一个过程或函数的开放数组参数。

开放数组参数是在编译时不知道数组元素数量的。它允许子程序使用可变大小的数组。

 var   i : Integer; 
        Source : array[0..4] of Integer; 
 begin   // 创建一个源数组,元素个数与数组为0..4  
   for i := 0 to 4 do    
      Source[i] := i;   
   // 使用Slice函数传递源数组的前3个元素, 
   // 作为下面子程序的开放数组参数。   
   ShowSlice(Slice(Source, 3)); 
end; 
 // 显示一个未知大小的数组 - 以开放数组参数传入 
procedure TForm1.ShowSlice(SubArray : array of Integer); 
var   i : Integer; 
begin   // 显示这个数组的每个元素  
  for i := 0 to Length(SubArray)-1 do    
     ShowMessage(SubArray[+IntToStr(i)+] : +          IntToStr(SubArray[i]));
 end; 
程序运行结果:

SubArray[0] : 0

SubArray[1] : 1

SubArray[2] : 2

 

function Slice

原文:http://www.cnblogs.com/moonwind/p/4505829.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!