我正在尝试通过 Delphi 中的 USB 端口连接到 Graphtec 绘图仪。以下 C++ 代码片段由制造商提供:
#include <windows.h>
#include <stdio.h>
typedef HANDLE (APIENTRY *PROC_GITK_OPENUSB)(int, int, DWORD);
int main(int argc, char* argv[])
{
HMODULE hUsbLib = LoadLibrary("GITKUSBP.DLL");
PROC_GETK_OPENUSB lpfnGITK_OpenUsb = (PROC_GITK_OPENUSB)GetProcAddress(hUsbLib, "GITK_OpenUsb");
HANDLE hWrite = (lpgnGITK_OpenUsb)(0, 0, FILE_FLAG_OVERLAPPED);
HANDLE hRead = (lpgnGITK_OpenUsb)(0, 1, FILE_FLAG_OVERLAPPED);
OVERLAPPED WriteEvt, ReadEvt;
}
当然,还有更多内容,但这似乎是关键代码。在 Delphi 中,我尝试翻译并不成功。我要么需要一些翻译方面的专业知识,要么需要一些关于将 C++ 代码转换为我可以从 Delphi 调用的 dll 的指导。