关于DLL套用:有些机器可以,有些不行 |
尚未結案
|
laney
一般會員 發表:1 回覆:7 積分:1 註冊:2002-11-25 發送簡訊給我 |
1 编程环境:win2000 delphi6 oracle8i
2 运行环境:win98(or win2000) oracle81c
3 问题现象: 有些工作站(包括98、2000)运行没问题,有些会工作站上用LOADLibrary
函数装不上去(返回值为零),请教各位有何高见?有无碰过类似问题,如何解决? 程序中调用部分如下: procedure ExecDll(Ado8i:TADOConnection;DllName,arrang,account:string);
var
H: HWnd;
p: procedure(adoconn:TADOConnection;arg,acct:string);
begin
H:=LoadLibrary(pchar(DllName));
if H <> 0 then
begin
p := GetProcAddress(H,'show_exp');
if Assigned(p) then
begin
p(ado8i,arrang,account);
end
else
showmessage('调用地址错误,错误号:' inttostr(getlasterror()));
end
else
Application.MessageBox(pchar(DllName 'Dll调用出错,请重新启动!!!'), '警告', MB_OK);
FreeLibrary(h);
end; 發表人 - laney 於 2003/05/15 10:59:51
|
laney
一般會員 發表:1 回覆:7 積分:1 註冊:2002-11-25 發送簡訊給我 |
|
laney
一般會員 發表:1 回覆:7 積分:1 註冊:2002-11-25 發送簡訊給我 |
|
Rain
資深會員 發表:31 回覆:236 積分:268 註冊:2003-02-17 發送簡訊給我 |
|
laney
一般會員 發表:1 回覆:7 積分:1 註冊:2002-11-25 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |