function - 用于检查方法是否已定义的 VFP 函数

Question

我想通过 using 触发对象的方法BINDEVENT()，但该方法可能不存在。因此，我想在发布之前检查该方法是否已定义BINDEVENT()。

例如，在下面的代码片段中，如果oHandler.myresize()不存在，则会在BINDEVENT().

PUBLIC oHandler
oHandler=NEWOBJECT("myhandler")
DO (_browser)
BINDEVENT(_SCREEN,"Resize",oHandler,"myresize")

DEFINE CLASS myhandler AS Session
   PROCEDURE myresize
      IF ISNULL(_obrowser) THEN
         UNBINDEVENTS(THIS)
      ELSE
         _obrowser.left = _SCREEN.Width - _obrowser.width
      ENDIF
   RETURN
ENDDEFINE

因此，我想检查该方法是否myresize()存在。
为此目的是否有任何语言功能？它与 php 函数function_exits()或method_exists()非常相似。

Answer 1

PEMSTATUS(VariableNameRepresentingTheObject, "MethodOrPropertyLookingFor", 5 )

如果存在于给定对象上，则返回 true 或 false。