小编Gio*_*Col的帖子

我愿意用一个特定的函数处理一些错误，用另一个函数处理其他一些错误。有没有办法在 Delphi 中做到这一点而不重复整个“on E:X do”块？

例如，我有以下代码：

try
  someProcedure()
except
  on E:Error1 do
    thisFunction(E)
  on E:Error2 do
    thisFunction(E)
  on E:Exception do
    thatFunction(E)
end;

是否可以用类似于以下的任何方式编写，避免重复thisFunction？

try
  someProcedure()
except
  on E:Error1, Error2 do
    thisFunction(E)
  on E:Exception do
    thatFunction(E)
end;