在前輩的指導下，可以用picklist做下拉菜單了。但是如何實現選擇一個值後，另外一列的值由此變呢？比如是columns[0]對應物料編碼，columns[1]則顯示對應的物料名稱,columns[2]則顯示物料類別。做了半天，實現弄不出來了，請前輩指教，不勝感激！ 努力过，还有什么遗憾呢!

您好： 你在Query or table上點兩下 field type=>lookup new field 將key fields 、 lookup fields 選擇『物料編碼』 其餘的自行設定 設定完之後DBgrid再選擇新增的這ㄍ欄位就可以了 物料類別一樣的動作再做一次 ~~應無所住而生其心~~

你好，看了这篇你应该会了解了： http://delphi.ktop.com.tw/topic.php?topic_id=23603 试试看。 ——行径窄处，留一步与人行——

好象不行啊－不知我有沒有把意思表達清楚，再說明一下： 首先如圖一，先picklist出現一個下拉菜單（從一個表或者視圖的字段中產生，附圖是四列，實際上只顯示第三列即可），這一功能已經實現了。 其二就是，當選中下菜單的一行後，品名會顯示名稱，同時貨品規格及單價也顯示出來。如下圖所示 努力过，还有什么遗憾呢!

其實你把PickList想的太神奇了, 當你選擇你所要的資料時, 不會自動將資料帶出, 其它資料還是要自己一個欄位一個欄位的放進去. 我的習慣是在"品名"的TField欄位的OnChange, 當其被觸發時, 再把其它的資料取出, 放到對映的欄位中. 希望對你有所幫助.

您好： 小弟寫了ㄍ簡單的範例，看是不是你要的http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46976 ~~應無所住而生其心~~

謝謝terrychen兄的實例。我想這基本能實現我需要的的功能。只是還有一點不明白： DBGrid1.Columns[0].PickList.clear; While not ADOQuery1.Eof do begin DBGrid1.Columns[0].PickList.add(ADOQuery1.fieldbyname('Product_no').AsString ',' ADOQuery1.fieldbyname('product_color').AsString ',' ADOQuery1.fieldbyname('suggest_price').AsString ''); ADOQuery1.Next; end 這段代碼只是在columns[0]中增加了picklist，為什麼columns[1],columns[2]也會彈出下拉框呢？沒有代碼，這是如何實現的？ 小弟愚笨，還請賜教！ 努力过，还有什么遗憾呢!

您好： 那是因為columns[1],columns[2]是lookup產生的是虛擬的欄位 若是你不要將DBGrid1.Columns[1].ReadOnly:= True; 這樣就不會有了 不過那程式有ㄍ小BUG 你只要將ADOQuery2裡的product_no 的displaywidth、size設成11就可以了 ~~應無所住而生其心~~ 發表人 - Terrychen 於 2004/03/25 17:35:17

terrychen兄，太感謝了！我真的受益非淺！ 努力过，还有什么遗憾呢!