DELPHI 初学 :在DELPHI中什么叫主函数 什么叫子函数
3个回答
展开全部
delphi 有主函数和子函数的说法吗??
不过有函数和内嵌函数的说法
也就是一个函数里 内部又定义了一个函数
有点像你说的那个主函数和子函数的定义
是不是这样:
procedure TForm1.zfun(P: Pointer);
var
tmp:integer;
procedure xfun(x:Pointer);
begin
if x=nil then
showmessage('nil');
end;
begin
xfun(P);
end;
执行 zfun(nil);
就弹出一个对话框了 嘿嘿 这样也相当于是主函数和子函数了吧
不过有函数和内嵌函数的说法
也就是一个函数里 内部又定义了一个函数
有点像你说的那个主函数和子函数的定义
是不是这样:
procedure TForm1.zfun(P: Pointer);
var
tmp:integer;
procedure xfun(x:Pointer);
begin
if x=nil then
showmessage('nil');
end;
begin
xfun(P);
end;
执行 zfun(nil);
就弹出一个对话框了 嘿嘿 这样也相当于是主函数和子函数了吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
nil就是空指针
直接把指针当参数传递即可
类似这样的
procedure xx(a:pchar);
var
tm:^TAdodataset;
begin
tm:=Pointer(a);
...
end;
直接把指针当参数传递即可
类似这样的
procedure xx(a:pchar);
var
tm:^TAdodataset;
begin
tm:=Pointer(a);
...
end;
追问
在DELPHI中怎么定义一个指针函数
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询