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

（出处：http://www.jycrop.com/read.php/151.htm）