delphi调用dll问题,300分全部送上。
我用delphi调用一个VC++的dll
这个dLL我没有源码。大小写绝对正确
dll里面的一个CloseCommPort函数，dll说明说里面有，说明如下：
5、CloseCommPort
VOID PASCAL CloseCommPort(HANDLE hCom)
功能说明：关闭指定的通信端口。
参数说明：
返回值：无
相关函数：
我用eeXeScope查看也有这个函数
但是我动态,静态调用CloseCommPort这个函数都会报内存错误
动态调用
Fun3 := GetProcAddress(FHandle,'CloseCommPort')
if Assigned(Fun3) then
Assigned(Fun3)返回为false
也就是说并未加载到此函数。
这是为什么呢？
下面是我写的delphi代码 ，谁能帮我解决我会300分送上
TFun1=function(lpszPortNum: LPCSTR;dwBaudRate: DWORD): DWORD; stdcall;
TFun2=procedure(hCom: Thandle); stdcall;
TFun3=function(DevNo: LPCSTR;var pAbout: LPSTR): DWORD ; stdcall;
Var FHandle: THandle;
Fun1: TFun1; //打开端口
Fun2: TFun3; //读取版本信息
Fun3: TFun2; //关闭端口
DevNo: LPCSTR;
pAbout: LPSTR;
begin
FHandle := LoadLibrary('168netcom.dll');
try
if FHandle>0 then
begin
Fun1 := GetProcAddress(FHandle,'OpenCommPort'); //打开端口
if Assigned(Fun1) t
相关问答：
这语言好难啊 学delphi简单 哭
一个dll 和一个 指针函数调用 搞了我2礼拜 还是在我有delphi基础的情况下 哭
难度 比 delphi 高很多。继续努力学啊。
好像也并不比delphi难多少吧
主要代码 不直观了� ......
两个月前，开始招聘Delphi程序员，招聘前随手写了几道题，用来笔试。
到现在还没有招到人，很无奈，标准甚至降到只要能做第1、3、5题就录用的水平。结果竟然没有人能够将这3题都答对。很多人连str ......
我想一个 memo 两个button 一个edit
memo中导入文本 然后点击一次 button edit1.txt 自动添加一行memo
再次点击 添加memo下一行文本 如何实现
我的代码是
==
procedure TForm1.Button2C ......
