码迷,mamicode.com
首页 > 其他好文 > 详细

返回值为 Record类型的函数 初始化 Result

时间:2015-07-04 18:07:34      阅读:121      评论:0      收藏:0      [点我收藏+]

标签:

function TMiTeC_Storage.GetPhysInfo(Index: integer): TDeviceInfo;
begin
  Finalize(Result);
  FillChar(Result,SizeOf(TDeviceInfo),0);
  if (Index>=0) and (Index<Length(FPHYS)) then
    Result:=FPHYS[Index];
end;

MiTeC控件的写法

返回值为 Record类型的函数 初始化 Result

标签:

原文地址:http://www.cnblogs.com/CodeGear/p/4620876.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!