想实现一个软件关于图像抓拍,我们已经有了库函数(*.dll),但是这个软件要实现对于
没有安装图像驱动的电脑也能使用但对于没装图形驱动的电脑如果一开始就调用
Function BeginCG300(x:longint):longint;stdcall;external'CG300d32.dll';
....
在程序中调用这个函数就会出错(并没用执行到)并且程序不可继续执行.
我采用
var
myBegincg300:function(x:longint):longint;
Pic_handle:Thandle;
....
Pic_handle:=Loadlibrary('CG300d32.dll');
myBegincg300:=GetProcAddress(Pic_handle,'begincg300');
调用
mybegincg300(1);
出错!
class EaccessViolation!!
没有安装图像驱动的电脑也能使用但对于没装图形驱动的电脑如果一开始就调用
Function BeginCG300(x:longint):longint;stdcall;external'CG300d32.dll';
....
在程序中调用这个函数就会出错(并没用执行到)并且程序不可继续执行.
我采用
var
myBegincg300:function(x:longint):longint;
Pic_handle:Thandle;
....
Pic_handle:=Loadlibrary('CG300d32.dll');
myBegincg300:=GetProcAddress(Pic_handle,'begincg300');
调用
mybegincg300(1);
出错!
class EaccessViolation!!
解决方案 »
- 寻Object Pascal语法书
- 大家帮我看看这是什么控件 我市在每用过 在哪里能下载到??谢谢
- 一个菜鸟问题,请高手指点?
- Shape上面怎么显示文字啊?
- 怎样将两个时间类型相减最后得到的结果还是时间型?请教!
- delphi 怎么把word,excel保存在数据库中
- 如何去掉Toolbar上方的那条线
- ■■新手请教■■ 怎么在自己的程序中加入资源然后写出
- delphi中使用Helpcontext(context)实现上下文敏感的帮助,其中的context值对应RTF文件下标中的那个??
- 是高手的过来!!如何在Delphi中根据PID来结束系统线程
- 奇怪:Delphi用ADO连接Oracle出错:Ora-06413:连接未打开,exe文件换个目录又好了?
- 数据库的一个小问题!!!急用!!
还有就是你调试一下.看Pic_Handle有不有有效的值.
你不妨换种异常处理方式比如,这样:
try
try
......
......
finally
end;
....
except
exit;
end;
在Try…Except 结构中嵌套try.....finally 结构,先释放资源,再进行异常处理,这样试试。
我调试了Pic_handle 是个有效得值.
我也要能够运行包含BeginCG300这个函数程序
只是我可以做到在运行过程中包含BeginCG300这个函数程序的行没有真的执行到。
但是编译时没有错,可开始运行时,因为有了包含BeginCG300的函数行。所以
报错。 说没有安装驱动/。