理解 Delphi 的类(十) - 深入方法[27]

为什么80%的码农都做不了架构师？>>>

//所谓递归函数, 就是自己调用自己的函数, 先来个简单的例子:{递归调用的简单示例}
procedure alert(i: Integer = 1);
beginShowMessage(IntToStr(i)); {这是方法的功能}Inc(i);if i<10 thenalert(i);               {这是方法自调用}
end;{测试}
procedure TForm1.Button1Click(Sender: TObject);
beginalert; {会连续弹出 9 个对话框, 分别提示 1..9}
end;

转载于:https://my.oschina.net/hermer/blog/320256

理解 Delphi 的类(十) - 深入方法[27] - 递归函数: 简单示例相关推荐

理解 Delphi 的类(十) - 深入方法[28] - 递归函数实例: 搜索当前目录下的所有嵌套目录...
为什么80%的码农都做不了架构师?>>> //上面一个例子不能说明递归函数的本质, 直接来个实用的函数吧, 刚好要用.unit Unit1;interfaceusesWindo ...
理解 Delphi 的类(十) - 深入方法[17] - 提前声明
为什么80%的码农都做不了架构师?>>> //要点17: 如果前面的方法要调用后面的方法, 后面的方法需要提前声明 function MyFunB(x: Integer): I ...
理解 Delphi 的类(十) - 深入方法[23] - 重载
为什么80%的码农都做不了架构师?>>> {下面的函数重名, 但参数不一样, 此类情况必须加 overload 指示字;调用时, 会根据参数的类型和个数来决定调用哪一个;这就是 ...
理解 Delphi 的类(十) - 深入方法[9] - 调用时的括号
为什么80%的码农都做不了架构师?>>> //要点9: 没有参数的过程或函数, 在调用时可以省略 (); 也可以带着 function MyFun: string; begin ...
理解 Delphi 的类(十) - 深入方法[4] - 共同类型的参数的简化写法
//要点4: 多个相同类型的参数可以简化写法 function MyFun(str: string; x,y,z: Integer): string; beginResult := str + Int ...
理解 Delphi 的类(十) - 深入方法[13] - 在 interface 区声明的方法
为什么80%的码农都做不了架构师?>>> //要点13: 需要给其他单元调用, 必须在 interface 声明, 但必须在 uses 区后面 unit Unit1;inter ...
理解 Delphi 的类(十) - 深入方法[2] - 参数分割
//要点2: 过程和函数都可以有一个或多个参数; 参数用 ; 号分割 procedure MyProc(i: Integer); beginShowMessage(IntToStr(i)); end; ...
理解 Delphi 的类(十) - 深入方法[15] - 调用其他单元的函数
为什么80%的码农都做不了架构师?>>> //要点15: 调用其他单元的函数 //包含函数的单元: unit Unit2;interfacefunction MyFun(x,y ...
理解 Delphi 的类(十一) - 深入类中的方法[8] - 抽象方法与抽象类
//抽象方法类似与接口; 在没有接口的年代 Delphi 是用抽象方法来模拟接口的; 我想它最终会被接口替代.{下面就定义了两个抽象方法} TMyClass = class(TObject)proce ...

理解 Delphi 的类(十) - 深入方法[27] - 递归函数: 简单示例

理解 Delphi 的类(十) - 深入方法[27] - 递归函数: 简单示例相关推荐

最新文章

热门文章