易截截图软件、单文件、免安装、纯绿色、仅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 7 有点落伍了。
先想学习其他编程工具,或者最新版的delphi,请大家推荐推荐。

方向有没有定下来?有目标才好选工具啊

那就学C#吧

软件要求,类似delphi7的编程环境,喜欢 ......

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登陆窗口重新设置密码.

问题一。我在做课程设计的时候弄了个重新设置密码窗口,但是把 PasswordChar 改为了 * ,现在怎么把输入好的密码保存到表Password里(如果 PasswordChar 是 #0 的话我知道)。
问题二。我保存好后怎么从表Password里 ......

delphi WITH DO的问题

procedure TForm2.Button1Click(Sender: TObject);
var
  i:integer;
begin
SetLength(a,200);
for I := 0 to 199 do
begin
A[i]:=Tedit.Create(self);
  with A[i] do
&n ......

delphi过滤htm的问题

HTML code:
<th scope="col">快件单号</th><th scope="col">操作时间</th><th scope="col">快件流程</th>
</tr><t ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号