W
wchhsh
Unregistered / Unconfirmed
GUEST, unregistred user!
在我的机上(win98se+Delphi6e),模仿一段程序:
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select 会员ID,口令,性别 from hyzl');
Query1.Sql.Add('Where 会员ID='''+DlhyId+'''');
Query1.Open;
if (Query1.RecordCount<>1) or (Edit2.Text<>Query1.FieldValues['口令']) then
begin
showMessage('会员号或口令不对,请检查。');
Edit1.SetFocus;
......
原程序可运行无误,而我模仿的输入会员号或口令确定后就出错roject *.exe raised exception class
EDBEngineError With message 'Capability not supported'...
请教诸位大侠这是为什么?
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select 会员ID,口令,性别 from hyzl');
Query1.Sql.Add('Where 会员ID='''+DlhyId+'''');
Query1.Open;
if (Query1.RecordCount<>1) or (Edit2.Text<>Query1.FieldValues['口令']) then
begin
showMessage('会员号或口令不对,请检查。');
Edit1.SetFocus;
......
原程序可运行无误,而我模仿的输入会员号或口令确定后就出错roject *.exe raised exception class
EDBEngineError With message 'Capability not supported'...
请教诸位大侠这是为什么?