在下面代码里在个已经被删除了对象(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参数信息以及参数类型例如总是保证不给个缓冲参数传递个无效指针中国自学编程网www.zxbc.cn  


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: ; 
begin 
s:=’’; 
s[1]:=’a’;  
//Access violation将会出现 
end; 


6. 直接引用指针 
你必须间接引用指针否则你会改变指针地址并可能会破坏其他存储单元 : 
procedure TForm1.Button1Click(Sender: TObject); 
var 
p1 : poer; 
p2 : poer; 
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头上如果你自己出现了这个尴尬面对用户询问我们该如何解释？本文就是最好答案