我在VB下写了一个DLL,其中有一个函数,形式如下:
Function GetEncrAnsw(InAnswer As String, InPassword As String) As String
要在Delphi中调用这个函数,请问在Delphi中要怎样使用?请高手指点!!
Function GetEncrAnsw(InAnswer As String, InPassword As String) As String
要在Delphi中调用这个函数,请问在Delphi中要怎样使用?请高手指点!!
createOleObject 之類後, 才能調用
Private Declare Sub ShowAboutFrm Lib "E:\liutao\MyTemplate\AboutDll\test\AboutDll\Aboutdll.dll" (ByVal AHandle As Long, ByVal ACaption As String, ByVal AName As String)然后调用Dll中的ShowAboutFrm函数
ShowAboutFrm Form1.hWnd, "About", "NetWolf"
function GetEncrAnsw(InAnswer,InPassword:pchar):pchar;stdcall;'dll文件名'