怎么从DLL里取得多个参数

2013-09-12

如何从DLL里取得多个参数在一个DLL文件里有个方法PROCEDURE GetParaLOCAL A as Character, B as Character

如何从DLL里取得多个参数
在一个DLL文件里有个方法
  PROCEDURE GetPara
    LOCAL A as Character, B as Character
    A="a"
    B="b"
    RETURN A, B
  ENDPROC

在前端如何取得两个以上的参数？
[解决办法]
返回一个对象即可

Function GetPara
  oRet = NewObject('Empty')
  AddProperty(oRet, 'a', '123')
  AddProperty(oRet, 'b', 789)
  Return oRet
EndFunc

调用者用：
oo = GetPara()
? oo.a, oo.b

[解决办法]
按地址传递也可以，如：

Clear
lcA=''
lcB=''
If GetPara(@lcA,@lcB)
?lcA,lcB
Endif
Procedure GetPara
Lparameters tcParaA,tcParaB
tcParaA="a"
tcParaB="b"
Return .T.
Endproc