access violation at address 问题
delphi 编程碰到运行期间出现 access violation at address 问题。跟踪程序到一代码处,发现并没有错误,不知怎么回事。
代码如下:
if ((flag[img.Tag-1]=true) and (flag[img.Tag+1]=false))then
begin
img:=timage(imglist.Items[img.Tag]);
img.Picture.LoadFromFile('d:\qq\1.jpg');//就是在这里出现错误的!
showmessage('就在这里!');
session[i].CSocket.SendText('左边有人');
end;
根据网上的方法:
右击“我的电脑”。单击“属性”。
在“系统属性”中单击“高级”。
在“性能”中单击“设置”。
在“性能选项”中单击“数据执行保护”。
单击“添加”。选择要运行的程序。
OK。就这么简单
搞了之后还是没有解决毛病,不知哪位高手可以帮帮我哦。