Delphi try except finally

たまーに触れる機会があるのですDelphi
そして書き方をすっかり忘れているのです。。

try except finallyが分かりません
http://piza.2ch.net/tech/kako/968/968228267.html

以下、引用

function Foo(): Boolean;
begin
　リソース確保;
　try try
　　例外が発生する可能性のある処理;

　　Result := True;
　Except
　　On E:Exception do begin
　　　Result := False;
　　　ShowMessage(E.Message);
　　end;
　end;
　finally
　　リソース解放;
　end;
end;