zoukankan
html css js c++ java
Delphi Access violations 问题的解决方法
Delphi Access violations 问题的解决方法
作者: 来源: 发布日期:2007-12-05
在下面的代码里,在调用一个已经被删除了的对象(b:TBitmap)事件后,一个Access violation出现了:
var b:TBitmap;
begin
b:=TBitmap.Create;
try
//对b对象进行一些操作
finally
b.free;
end;
...
//由于b已经被释放,一个Access violation错误将会出现
b.Canvas.TextOut(0,0,’这是一个 Access Violation’);
end;
2. 不存在的API参数
如果你试图给Win API函数传递一个不存在的参数将会出现一个Access violation错误。解决此类Access violation错误的最好方法是查阅Win API帮助,看看这个API函数调用的参数信息以及参数类型。例如,总是保证不给一个缓冲参数传递一个无效指针
3. 让Delphi释放
当一个对象拥有另一个对象时,让它给你做删除工作。因为默认情况下,所有的窗体(自动创建的)都属于Application对象。当一个应用程序结束时,它释放了Application对象,也就释放了所有窗体。例如,如果你在程序开始时自动创建了两个窗体(Form1/Unit1和Form2/Unit2),下面的代码就会导致Access violation错误的出现:
unit Unit1;
...
uses unit2;
...
procedure TForm1.Call_Form2
begin
Form2.ShowModal;
Form2.Free;
//Access violation错误将会出现
Form2.ShowModal;
end;
4. 杀死异常
永远不要破坏临时异常对象(E),处理一个异常会自动释放异常对象。如果你自己手动释放了异常对象,程序会试图再次释放它,那么就会出现Access violation错误:
Zero:=0;
try
dummy:= 10 / Zero;
except
on E: EZeroDivide do
MessageDlg(’不能用0做除数!’,mtError, [mbOK], 0);
E.free. ////Access violation错误将会出现
end;
5. 检索一个空字符串
一个空字符串是没有任何数据的。就是说,检索一个空字符串相当于访问一个不存在的对象,这将导致Access violation错误:
var s: string;
begin
s:=’’;
s[1]:=’a’;
//Access violation错误将会出现
end;
6. 直接引用指针
你必须间接引用指针,否则你会改变指针地址并可能会破坏其他存储单元 :
procedure TForm1.Button1Click(Sender: TObject);
var
p1 : pointer;
p2 : pointer;
begin
GetMem(p1, 128);
GetMem(p2, 128);
//下一行导致Access violation错误
Move(p1, p2, 128);
//下一行方法正确
Move(p1^, p2^, 128);
FreeMem(p1, 128); [Page]
FreeMem(p2, 128);
end;
这些就是我对运行期Access Violation错误的全部建议,我希望你们也能对你们程序出现的Access Violation错误提出一些看法。
老猫点评:相信所有读者都遇到过“Access violation” 的错误,如果不是自己的程序,我们有很多人就把责任都推在Bill Gates的头上。如果你自己的程序出现了这个尴尬的错误,面对用户的询问,我们该如何解释?本文就是最好的答案。
查看全文
相关阅读:
Windows系统开机硬盘自检问题解决
更改软件默认安装路径
windows添加开机启动项
xp 如何打开(进行)远程桌面连接
xp看系统位数
教你创建一个别人打不开删不掉的文件夹(干坏事爱好者必看)
无操作一段时间显示器无信号
长时间用电脑,(给窗口选一个合适的颜色)设置窗口绿色
Windows右键菜单设置与应用技巧
Outlook如何定时发邮件
原文地址:https://www.cnblogs.com/feng801/p/1358164.html
最新文章
Axios 中文说明
Nodejs进阶:核心模块net入门与实例讲解
Nginx开启Gzip压缩大幅提高页面加载速度
大公司里怎样开发和部署前端代码
webpack务虚扫盲
NodeJS http模块
44 道 JavaScript 难题(JavaScript Puzzlers!)
关于React面试题汇总
java注解
文书网分析
热门文章
python enumerate元素的时候可以获取下标,并且可以指定开始的下标值。
python 删除字符串中的连续空格只保留一个
python bisect模块二分法查找
python 二分法查找思考理解小白向け
流畅的python笔记
Flask学习总结笔记推荐
Castle.Net 基本应用
运行python不报错,运行pip报错
XP如何开启3389端口远程桌面
远程桌面电脑连接设置
Copyright © 2011-2022 走看看