Delphi xe中 Exit 的新用法

本文整理自网络，侵删。

 
Delphi 2009 中 Exit 的新用法

Nick 描述了 Exit 在 Tiburon 中的新语法，看代码：

function foo(const I: Integer): string;
begin
    if I < 0 then Exit('负数'); 
    Result := '正数'; 
end; 
function foo(const I: Integer): string;
begin
    if I < 0 then begin Result := '负数'; Exit; end; 
    Result := '正数'; 
end; 
可以看到，Exit 的语言构造发生了变化，可以像函数一样带一个参数，参数类型就是 Result 的类型，退出函数的同时返回函数的值，与 Java、C# 等其它语言的 Return 功能一样。
 

相关阅读 >>

Delphi idhttp上传图给asp完美解决

Delphi 隐藏进程代码

Delphi listbox自动获取列表框中的组件焦点

Delphi 一个高效的正整数排序函数

Delphi dbgrid 保存txt

Delphi 字符串去掉最后一个字符

Delphi 不可移动的窗体

Delphi 使用管道进程间通讯

Delphi常用获取系统信息的函数单元

Delphi windows 编程[16] - 添加与删除菜单项:getmenu、appendmenu、deletemenu、drawmenubar

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi xe中 Exit 的新用法