1,178
社区成员
发帖
与我相关
我的任务
分享
ADOQuery1->Close();
ADOQuery1->SQL->Add("select * from shujubiao where 疾病分类 = '身体疾病'");
ADOQuery1->ExecSQL();
ADOQuery1->Active = true;
if (ADOQuery1->FindFirst())
{
ComboBox1->Items->Add(ADOQuery1->FieldByName("疾病名称")->AsString);
int n = 1;
int m = ADOQuery1->RecordCount;
while (n < m)
{
if (ADOQuery1->FindNext())
{
ComboBox1->Items->Add(ADOQuery1->FieldByName("疾病名称")->AsString);
}
n++;
}
}