Delphi2009增强之Exit函数_Delphi_编程开发_程序员俱乐部

中国优秀的程序员网站程序员频道CXYCLUB技术地图
热搜:
更多>>
 
您所在的位置: 程序员俱乐部 > 编程开发 > Delphi > Delphi2009增强之Exit函数

Delphi2009增强之Exit函数

 2011/7/26 7:57:45    程序员俱乐部  我要评论(0)
  • 摘要:InTiburon,thefollowingtwofunctionsdoexactlythesamething:在Delphi2009(Tiburon)中,以下两个函数做相同的事情:functionDoSomething(aInteger:integer):string;beginifaInteger<0thenbeginExit(‘Negative’);end;Result:=‘Positive’;end;functionDoSomething(aInteger:integer)
  • 标签:函数 2009 Delphi Delphi2009 Exit函数
In Tiburon, the following two functions do exactly the same thing:
在Delphi2009(Tiburon)中,以下两个函数做相同的事情:

function DoSomething(aInteger: integer): string;
begin
  if aInteger < 0 then
  begin
    Exit(‘Negative’);
  end;
  Result := ‘Positive’;
end;



function DoSomething(aInteger: integer): string;
begin
  if aInteger < 0 then
  begin
    Result := ‘Negative’;
    Exit;
  end;
  Result := ‘Positive’;
end;

http://www.qfly.cn 翻译,

原文参考了:http://blogs.codegear.com/nickhodges/2008/07/22/39079

发表评论
用户名: 匿名