什么是Dynamic function in progress 4gl?我试了很多都没有搞清楚,请举例说明。我是这门语言的大人物。
动态函数是一种动态调用函数调用的方式。编译器对您所做的工作的了解有限,因此如果您不使用正确的输入和输出,则会出现运行时错误。
根据用户输入运行不同功能的一个示例:
DEFINE VARIABLE iFunc AS INTEGER NO-UNDO.
DEFINE VARIABLE iReturn AS INTEGER NO-UNDO.
FUNCTION f1 RETURNS INTEGER :
RETURN 1.
END FUNCTION.
FUNCTION f2 RETURNS INTEGER :
RETURN 2.
END FUNCTION.
FUNCTION f3 RETURNS INTEGER :
RETURN 3.
END FUNCTION.
FUNCTION exp RETURNS INTEGER (INPUT piInt AS INTEGER):
RETURN piInt * piInt.
END FUNCTION.
REPEAT :
UPDATE iFunc LABEL "What function?".
IF iFunc < 1 OR iFunc > 3 THEN LEAVE.
MESSAGE "Return value: " DYNAMIC-FUNCTION ("f" + STRING(iFunc)) VIEW-AS ALERT-BOX.
END.
函数获取输入的另一个示例:
FUNCTION exp RETURNS INTEGER (INPUT piInt AS INTEGER):
RETURN piInt * piInt.
END FUNCTION.
MESSAGE "10 x 10 = " DYNAMIC-FUNCTION ("exp", 10) VIEW-AS ALERT-BOX.
这个对相同“exp”函数的调用将编译但在运行时崩溃。代码发送一个字符串(“HELLO”)作为输入,函数需要一个整数。
MESSAGE "10 x 10 = " DYNAMIC-FUNCTION ("exp", "HELLO") VIEW-AS ALERT-BOX.
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句