全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:997
推到 Plurk!
推到 Facebook!

利用ComboBox 顯示資料庫的資料

答題得分者是:herbert2
paul75919
一般會員


發表:4
回覆:2
積分:1
註冊:2011-09-22

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-09-22 16:49:07 IP:60.251.xxx.xxx 訂閱
各位高手好:我有一個問題一直試不出來

有一個TABLE A

A有Name,EmployeeID,Location

我已經寫好利用一個Edit輸入Name,
然後按確定使一個DBGrid去顯示這個Name對應的Name,EmployeeID,Location

這是我的CODE:


void __fastcall TForm1::Button1Click(TObject *Sender) //輸入要查詢的員工
{
AnsiString Name;
Name = InName->Text;
AnsiString Personal = "Select Name,EmployeeID,Location From A Where Name = '" Name "';";
try{
ADOConnection1->Close();
ADOConnection1->ConnectionString = "FILE NAME=" ExtractFilePath(Application->ExeName) "\DBConn.udl";
ADOConnection1->Open();
ADOQuery1->Connection = ADOConnection1;
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add(Personal);
ADOQuery1->Active = true;
}catch(Exception &e)
{
ShowMessage(e.Message);
ADOConnection1->Close();
ADOQuery1->Close();
}
}


現在想做一個combobox選單可以顯示TABLE的Name讓使用者選擇

然後在用DBGrid去顯示這個Name對應的Name,EmployeeID,Location

但是試了一天都試不出來...

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
AnsiString People = "select Name From logfile;" ;
ADOQuery2->Close();
ADOQuery2->SQL->Clear();
ADOQuery2->SQL->add(People);
ComboBox1->Items(add( ) );
ADOQuery2->Open();
}
紅色部分不知道怎麼寫...>_<


herbert2
尊榮會員


發表:58
回覆:632
積分:878
註冊:2004-04-16

發送簡訊給我
#2 引用回覆 回覆 發表時間:2012-01-02 23:33:27 IP:202.39.xxx.xxx 訂閱
1. AnsiString People = "select Name From logfile;" ; // SQL 指令結尾勿加『;』
2. ComboBox1->Items->add( ) ); // 應於 ADOQuery2->Open(); 後才以迴圈執行. 沒 Open 那來的資料?

ADOQuery2->Open();
while (!ADOQuery2->Eof) {
ComboBox1->Items->add(ADOQuery2->FieldByName("Name")->AsString);
ADOQuery2->Next();
}

以上資訊在 On-Line Help 中都有, 請多利用 Help 可避免兜圈子。
系統時間:2017-10-23 21:24:14
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!