delphi 过程或是函数内嵌套过程或函数与该过程或是函数调用过程或是函数名有什么区别?
3个回答
展开全部
当然有区别了
前面嵌套是定义过程或函数不会执行过程或函数的内容
后面的是调用,会执行调用的过程或函数的内容
前面嵌套是定义过程或函数不会执行过程或函数的内容
后面的是调用,会执行调用的过程或函数的内容
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如楼上所说的都是对的。
举个例子
1。
procedure Mainprocedure();
var
Mytime:SYSTEMTIME;
function Childprocedure(): string;
begin
Result := '今天是星期'+IntToStr(MyTime.wDayOfWeek);
end;
begin
GetLocalTime(Mytime);
Showmessage(Childprocedure);
end;
2。
procedure Mainprocedure();
function Childprocedure(Mytime:SYSTEMTIME): string;
begin
Result := '今天是星期'+IntToStr(MyTime.wDayOfWeek);
end;
var
Mytime:SYSTEMTIME;
begin
GetLocalTime(Mytime);
Showmessage(Childprocedure(Mytime));
end;
不过第一种方式更符合嵌套的意义吧,嵌套函数的好处在于,子函数可以直接使用母函数的变量,否则直接声明还更容易阅读。
举个例子
1。
procedure Mainprocedure();
var
Mytime:SYSTEMTIME;
function Childprocedure(): string;
begin
Result := '今天是星期'+IntToStr(MyTime.wDayOfWeek);
end;
begin
GetLocalTime(Mytime);
Showmessage(Childprocedure);
end;
2。
procedure Mainprocedure();
function Childprocedure(Mytime:SYSTEMTIME): string;
begin
Result := '今天是星期'+IntToStr(MyTime.wDayOfWeek);
end;
var
Mytime:SYSTEMTIME;
begin
GetLocalTime(Mytime);
Showmessage(Childprocedure(Mytime));
end;
不过第一种方式更符合嵌套的意义吧,嵌套函数的好处在于,子函数可以直接使用母函数的变量,否则直接声明还更容易阅读。
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询