首页 > 其他 > 详细

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

时间:2015-07-04 18:04:36      阅读:243      评论: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
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!