****动态链接库指针错误*** 各位兄台帮小弟一下

小弟初学使用动态链接库，在调用程序调用运行时并没有问题，可是一关闭程序就报“指针无效”的错误，搞得我一头雾水，由于我刚开始接触，发现不了错误，请各位兄弟一定帮忙解决啊。
dll文件里的过程定义如下：

//执行sql语句 flag 的值 1 代表查询 2 代表插入 3代表修改
procedure execsql(myqy: TADOQuery; mysql: widestring; flag: real);
begin
try
if flag = 1 then
begin
with myqy do
begin
close;
sql.Clear;
sql.Add(mysql);
open;
end;
end
else if (flag = 2) or (flag = 3) then
begin
with myqy do
begin
close;
sql.Clear;
sql.Add(mysql);
execsql;
end;
end;
except
end;
end;

调用声明如下：
procedure execsql(myqy: TADOQuery; mysql: widestring; flag: real); far; external 'aa.dll';

多谢各位兄弟！！