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。就这么简单

搞了之后还是没有解决毛病，不知哪位高手可以帮帮我哦。