我目前在一家 IT 公司工作。他们使用 Clarion 制作了他们的软件,在该软件中,他们有一个 DLL,可以从他们的数据库中重新计算很多值。我需要从我的 C# 项目中调用这个 DLL。我尝试了一切,但它没有工作。
我的代码如下:
public partial class Form1 : Form
{
[DllImport("EPNORM.dll", EntryPoint = "MyRecalcualate@FlOUcOUcOsbOUc")]
public static extern void MyRecalcualate(System.Int64 myPtr, System.Int64 myLong, CWByte myByte);
[DllImport("User32.dll")]
public static extern Boolean MessageBeep(UInt32 beepType);
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
System.Int64 myPtrTemp = 1234;
System.Int64 myLongTemp = 5678;
System.Byte myByteTemp = 88;
try
{
MyRecalcualate(myPtrTemp, myLongTemp, myByteTemp);
bool messagebeep = MessageBeep(1);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
finally
{
MessageBox.Show("Successful");
}
}
}
问题是当我用断点调用它时,它只是消失在MyRecalcualate
方法中并在 2 秒后到达finallly
块并重新显示,而无需从 DLL 执行任何操作。这是因为我需要修复 DLL 方法中的某些内容还是因为我调用错误?
下面调用的参数是:MyRecalculate(LONG, LONG, BYTE)
MyRecalcualate PROCEDURE (MyStringPtr, MyLong, MyByte) ! Declare Procedure
LOC:CString CSTRING(255)
LOC:Byte BYTE
CODE
! clear completely LOC:CString with null values
LOC:CString = ALL('<0>', SIZE(LOC:CString))
! load string value, byte by byte, from memory address passed (MyStringPtr) and put into LOC:CString
I# = 0
LOOP
PEEK(MyStringPtr + I# , LOC:Byte)
IF LOC:Byte = 0 THEN BREAK END
LOC:CString[I# + 1] = CHR(LOC:Byte)
I# += 1
END
MESSAGE('MyString value is:||' & CLIP(LOC:CString))
MESSAGE('MyLong value is:||' & MyLong)
MESSAGE('MyByte value is :||' & MyByte)
这是他们的合同开发人员邮寄给我的参数截图以及他如何在 VB.NET 中调用它: VB.NET 代码:http: //imageshack.us/photo/my-images/269/callfromvisualbasictocl.jpg/ PARAMETERS IN CLARION :http: //imageshack.us/photo/my-images/100/asdxg.jpg/