Порядок проверки типов в TfsCallMethodEvent

Georgy

В обработчике TfsCallMethodEvent выжен порядок проверки типов Instance. Если в одном обработчике анализировать сразу несколько типов (ну не рубить же целую свинью из-за миски холодца ), то важно проверять от потомка к предку.

type
  TDescendant = class(TAncestor)
  ...
function TWrapper.CallMethod(Instance: TObject; ClassType: TClass;
  const MethodName: String; var Params: Variant): Variant;
  ...
  if Instance is TDescendant then
  ...
  else
  if Instance is TAncestor then
  ...

Поскольку оператор is работает, как ему и положено, то в случае обратного порядка проверки предок ничего не оставит своим потомкам .