＋设为首页 ＋添加到收藏夹
void __fastcall TfmMain::UpdatetvUser(TObject *Sender)
{
TTreeNode *itm;
int i;
if(adoqUser)
{
adoqUser->Close();
adoqUser->SQL->Clear();
adoqUser->SQL->Text="select * from User";
adoqUser->Open();
}
if(adoqUser->RecordCount>0)
{
for(i=0;i<adoqUser->RecordCount;i++)
｛
itm=tvUser->Items->Add(tvUser->Selected,adoqUser->Fields->Fields[0]->AsString);
itm->ImageIndex=12;
adoqUser->Next();
}
adoqUser->Close();
}
adoqUser->Close();
}
其中adoqUser是一个TADOQuery，tvUser是一个TTreeView,adoqUser的connection值是adocPm,TADOConnection连接能够成功。
这是一个子程序，一用到它就出现下面的问题：
Project Mail.exe raised exception class EOleException with message
Syntax error in FORM clause
你把你的ACCESS数据库设个密码，然后再以Admin身份连接TADOConnection
应该就可以了。
