午
午午
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure MyThread.Execute;
var
StrSQL:String;
begin
Try
CoInitialize(Nil);
StrSQL:='Select Count(CardNo) as CurInCount from CurInCards';
DM.ADOQuery_CurIn.close;
DM.ADOQuery_CurIn.SQL.clear;
DM.ADOQuery_CurIn.SQL.Text:=StrSQL;
DM.ADOQuery_CurIn.Open;//执行到这一步时出错,出错提示如题
Synchronize(Update);
Finally
CoUninitialize;
end;
end;
请各位指点一下,该怎么改?当程序执行到DM.ADOQuery_CurIn.Open前,我查看DM.ADOQuery_CurIn的active属性是false;不明白是怎么回事。
var
StrSQL:String;
begin
Try
CoInitialize(Nil);
StrSQL:='Select Count(CardNo) as CurInCount from CurInCards';
DM.ADOQuery_CurIn.close;
DM.ADOQuery_CurIn.SQL.clear;
DM.ADOQuery_CurIn.SQL.Text:=StrSQL;
DM.ADOQuery_CurIn.Open;//执行到这一步时出错,出错提示如题
Synchronize(Update);
Finally
CoUninitialize;
end;
end;
请各位指点一下,该怎么改?当程序执行到DM.ADOQuery_CurIn.Open前,我查看DM.ADOQuery_CurIn的active属性是false;不明白是怎么回事。