OnFindAncestor (TWriter)