关于dll的简单问题

[olivertree]

为什么存在内存泄漏？代码如下：
void __fastcall Tjhoper_Frm::addinf()
{

HINSTANCE Dll=LoadLibrary("jh6.dll");
if(Dll)
{
LoadJHFunc=(JHFunc *)GetProcAddress(Dll,"_sbbg_addinf");
if(LoadJHFunc)
{
if(LoadJHFunc(nfEdt->Text,unitid,xmbmEdt->Text,xmmcEdt->Text,gznrEdt->Text,lrjhyyEdt->Text,zysbclEdt->Text,fyEdt->Text.ToDouble(),1)!=true)
{
FreeLibrary(Dll);
return;
}
init();
}
else
ShowMessage("数据库暂时无法连接");
FreeLibrary(Dll);
if(Dll!=NULL)
{
ShowMessage("I still live in this computer!");
}
}
else
{
ShowMessage("找不到指定模块");
}
}
//------------------------------------------------------------------------------------------------------
总是出现下面的"I still live in this computer"提示。如果我使用if(FreeLibrary(Dll)!=true)
{
GetLastError();
}
的话，感觉dll已经被释放掉了，但是老出现内存泄漏的错误。
我在其它的地方也使用了几乎同样的函数就没事。烦请各位帮我看一看，不胜感激！（我是使用的别人的机器上的网，所以不能在线，但是请大家一定帮我看看亚:)）

[柯本]

Dll=LoadLibrary("jh6.dll");
...
...
FreeLibrary(Dll);

dll 不可能是NULL!

[fishtailer]

是啊，FreeLibrary(Dll)，并不能把dll设置成null，
那么，ShowMessage("I still live in this computer!")就总是执行；
你是根据什么判定有内存泄漏的，是不是调用的函数有问题？

[isoso]

FreeLibrary(Dll)，之后加上DLL=NULL

[cdmika]

释放后，当然需要手工置为NULL了。

[FlySky01]

已经说的很清楚了

[asimpleman]

gz

[he_rong]

HINSTANCE Dll=LoadLibrary("jh6.dll");
FreeLibrary(Dll);

注意上两项的配对使用！不要因为条件异常而没有FreeLibrary(Dll);

同意楼上的说法，一定要手工置Dll＝NULL；

[Robin]

[ThinkX]

你的代码有些不清晰。
下面是几种常用的程序结构，都是对于检测每一步是否执行成功:

1.

//注意clear 1和clear2函数有可能不同
bool flag = false;
flag = doSomething1();
if (!flag)
{
clear1();
return;
}

flag = doSomething2();
if (!flag)
{
clear2();
return;
}

2.
bool flag = false;
flag = doSomething1();
if (flag)
{
//在这中间最好不要调用释放资源的函数，也不要return，这样会打乱代码的结构，
//使代码出现多个出口。
flag = doSomething2();
if (flag)
....
}

//最后在这里统一释放资源
clearAll();
return;

3. //这种方法不是很常用，因为有goto，但是在老的代码中还是有一些
bool flag = false;
flag = doSomething1();
if (!flag)
goto errorHandler;
flag = doSomething2();
if (!flag)
goto errorHandler;

...

errorHandler:
clearAll();
return;

4.类似3，不过使用了异常

//注意，没有明显的clearAll()，可以在其中使用异常安全的代码来执行clearAll();
//最好的方法是将clearAll()放在析构函数中，对于bcb也可以使用__finally
try
{
bool flag = false;

flag = doSomething1();
if (!flag) throw MyException(errorCode1);

flag = doSomething2();
if (!flag) throw MyException(errorCode2);
}
catch(MyException& e)
{
return e.errorCode();
}

[hongliqiu]

最后要把DLL置为NULL。