易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi调用dll问题,专家救命,100分全部送上。

我用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 像亡国的南宋,试问这语言还有前途吗?

Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗? ......

delphi中copy函数的问题

edit2.Text:=edit2.Text+l.Strings[i]+',';
edit2.Text:=copy(edit2.Text,1,length(edit2.Text)-1);
为什么输出的结果里没有了逗号,比如说输入11,10,12,13,18输出是1011121318
如果去掉-1的话 ......

delphi浅显问题


大家帮看下  这个图片中 显示的是什么,双击可以打开一个窗体,但窗体时固定的,这个东西有什么用  谢谢了
http://hi.csdn.net/space-2158731-do-album-picid-427006.html
图片没显示出来



......

delphi中关于Edit的问题

在下面的代码中可以实现Edit1.Text中输入6个字母或数字时Edit2.SetFocus,那么我想让Edit2.text中输入6个字母时实现Edit3获得焦点,有没有简单一点的方法,谢谢大家了!!!

procedure TForm2.Edit1Change(Sen ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号