我用delphi调用一个VC++的dll
这个dll里面的一个ClsPort函数,dll说明说里面有,说明如下:
5、ClsPort
VOID PASCAL ClsPort(HANDLE hCom)
功能说明:关闭指定的通信端口。
参数说明:
返回值:无
相关函数:
我用eeXeScope查看也有这个函数
但是我动态,静态调用dll都会报内存错误
动态调用
FunClsPort := GetProcAddress(FHandle,'ClsPort')
if Assigned(FunClsPort) then
Assigned(FunClsPort)返回为false
并未加载到此函数。
这是为什么呢?
最多只能给100分,请专家指教啊。。
LoadLibray成功没?
我调用这个dll里面的其他函数是一点问题都没有的。
就是Close的这个函数找不到。这是为什么?
谁帮我解决再开贴给100分。救命啦。。
贴出引入库,调用的代码先
用eXeScope查一下函数,一定要注意大小写一致。
TFun1=function(lpszPortNum: LPCSTR;dwBaudRate: DWORD): DWORD; stdcall;
TFun2=function(hCom: Thandle): Variant ; 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
相关问答:
Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗?
......
edit2.Text:=edit2.Text+l.Strings[i]+',';
edit2.Text:=copy(edit2.Text,1,length(edit2.Text)-1);
为什么输出的结果里没有了逗号,比如说输入11,10,12,13,18输出是1011121318
如果去掉-1的话 ......
大家帮看下 这个图片中 显示的是什么,双击可以打开一个窗体,但窗体时固定的,这个东西有什么用 谢谢了
http://hi.csdn.net/space-2158731-do-album-picid-427006.html
图片没显示出来
......
在下面的代码中可以实现Edit1.Text中输入6个字母或数字时Edit2.SetFocus,那么我想让Edit2.text中输入6个字母时实现Edit3获得焦点,有没有简单一点的方法,谢谢大家了!!!
procedure TForm2.Edit1Change(Sen ......