奇怪的问题，在线等待！(50分)

procedure Tlogform.Button1Click(Sender: TObject);
begin
try
if dm.conn.Connected=true then
dm.conn.Connected:=false;
dm.conn.Open;
dm.manager_adoqry.Connection:=dm.conn;
dm.manager_adoqry.Active:=true;

dm.manager_adoqry.close;
dm.manager_adoqry.sql.clear;
dm.manager_adoqry.sql.add('select * from manager where username='+''''+nameedt.text+''''+' and managerpwd='+''''+passwdedt.text+''''+' and power='+''''+'3'+'''');
dm.manager_adoqry.open;

if dm.manager_adoqry.recordcount=1 then
showmessage('yes')
else showmessage('no');
except showmessage('53');
end;
end;


用adoconnection和adoquery做的cs机构。
这是登陆窗口，可是老是 提示：


project manage.exe raised exception class eaccessviolation with message 'access violation at addree 046e9c2 in module 'manage.exe'.read of address oooooo50'.process stopped .use step or run to contnue.

谢谢，虚心请教，分不够再加！

try it :


procedure Tlogform.Button1Click(Sender: TObject);
begin
try
if dm.conn.Connected=true then
dm.conn.Connected:=false;


//dm.manager_adoqry.Active:=true;

dm.manager_adoqry.close;
dm.manager_adoqry.sql.clear;
dm.manager_adoqry.sql.add('select * from manager where username='+''''+nameedt.text+''''+' and managerpwd='+''''+passwdedt.text+''''+' and power='+''''+'3'+'''');
dm.manager_adoqry.Connection:=dm.conn;
dm.conn.Open;
dm.manager_adoqry.open;

if dm.manager_adoqry.recordcount=1 then
showmessage('yes')
else showmessage('no');
except showmessage('53');
end;
end;

你到底想干嘛，代码看上去很乱

回： dragonlee007

这样还是不行呀，在第一个if语句那里就报错了，还是那个错。
能不能再帮我想想？

dm是自动创建的还是手工建的
这个问题好象是有对象没有创建

回：antic_ant
dm是 手工创建的，而且所有的属性我觉得都设置的正常。而且所有的connect都打开了。

你登陆这个窗口的时候，DM是已经打开了吗。必须show之后，才能调用他的东西。

dm必需在Tlogform之前创建.一般是dm创建错了.

接受答案了.