请问一个引用DLL时,DLL不存在,而造成错误的问题? 如果我的程序中用到的DLL不存在,程序就无法运行了,请问有没有办法使程序仍然可以运行,到报告DLL无法找到这样的错误呢?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 估计是没有办法,程序启动的时候就要去加载dll的,如果没有,程序应该没有办法运行的。 DLL的引用分为静态和动态你可以用动态装载的方法调用API函数 myhandle:thandle; myhandle :=loadlibrary('mydll');加载失败则引发异常try if myhandle<0 then raise exception.create('动态链接库调用失败,错误代码是:'+inttostr(getlasterror))finally FreeLibrary(myhandle);end;-------------------------------------------------在错的时间遇见错的人 是一种伤痛 在错的时间遇见对的人 是一种遗憾 在对的时间遇见错的人 是一种心伤 只有在对的时间遇见对的人才是一种幸福 我在程序中用到了DLL中的函数,如果做成像上面这位朋友说的那样,我程序编译通不过. 对啊,使用动态调用var HD:THandle;begin HD:=loadlibrary('*.dll');try if HD<0 then //..............Add you code finally FreeLibrary(HD);end; 使用动态调用 myhandle:thandle;try myhandle :=loadlibrary('mydll'); if myhandle<>0 then 做你的事情,=0的话表示加载失败finally FreeLibrary(myhandle);end; 100分求一个免费的表格控件,验货完毕,马上结贴 关于PAS文件的问题 如何设置Edit文本框默认是英文输入法呀? 创建excel文件后动态加载宏 感触很深...... 寻求编程高手!!。 昨夜奇遇!!!偶差点吓晕一个MM 100分求助!!!!!!快来啊!!!! 以Delphi的名义,请帮忙 Image2.Canvas.CopyRect(Image2.Canvas.ClipRect,Image1.Canvas,SrcRect);出错!!! 送分,,,该如何填这里的参数??????????急.................. dbgrid中点击title进行排序,请问如何实现。
你可以用动态装载的方法调用API函数 myhandle:thandle;
myhandle :=loadlibrary('mydll');
加载失败则引发异常
try
if myhandle<0 then
raise exception.create('动态链接库调用失败,错误代码是:'+inttostr(getlasterror))
finally
FreeLibrary(myhandle);
end;-------------------------------------------------
在错的时间遇见错的人 是一种伤痛
在错的时间遇见对的人 是一种遗憾
在对的时间遇见错的人 是一种心伤
只有在对的时间遇见对的人才是一种幸福
var
HD:THandle;
begin
HD:=loadlibrary('*.dll');
try
if HD<0 then
//..............Add you code
finally
FreeLibrary(HD);
end;
myhandle:thandle;
try
myhandle :=loadlibrary('mydll');
if myhandle<>0 then
做你的事情,=0的话表示加载失败
finally
FreeLibrary(myhandle);
end;