判断DLL的存在问题

Question

判断DLL的存在问题我想做一个函数　FISExistDLL(sDLLName:String):Boolean
sDLLName是给出的DLL文件名　
如果改DLL在内存中　返回为　True 
没有被加载返回为　         False该怎么写　谢谢

Answer 1

Fileexists()//判断文件是否存在

Answer 2

function FISExistDLL(sDLLName:string):boolean;
var hModule:handle;
begin
 hModule:=LoadLibrary(pChar(sDllName));
 FreeLibrary(hModule);
 Result:=Not (hModule=0);
end;

Answer 3

function FISExistDLL(sDLLName:string):boolean;
begin
 result:=ifthen(Windows.getmodulehandle(pchar(sDLLName))<>nil,true,false);
end;

Answer 4

多此一举了
直接写result:=GetModuleHandle(Pchar(sDLLName))<>nil;
就行了不需要ifthen

Answer 5

Focus(老鱼) ( ) 信誉：100