版主：你好．以下是我上次問你的問題． ******************************************************************* 想請教各位高手: 我的(aaa table）form2中是在作一個新增資料的form，我有用了幾個edit和一個combobox，那我新增的資料要寫入資料庫內，且顯示在form1的dbgrid上，要怎麼作呢？ 目前我的作法： form1.adoquery1.insert; form1.adoquery.fieldbyname('code').asstring:=(edit1.text); form1.adoquery.fieldbyname('CODE1').asstring:=(combobox.text); ********************************************************************* 那我現在有一個問題想要問你耶． 我要在(bbb table)作業時，去參考到aaa table內的form2上combobox的值(yes,no),那是要怎麼作呢？網友建議我在資料庫內多設個欄位(布林),那我在用上次版主教我的． form1.adoquery.fieldbyname('code1').asstring:=(combobox.text); 的方法將值寫入資料庫內時，將那個布林的值寫進資料庫內. 就是原本那個combobox的欄位為desport在delphi combobox items為 no和 yes 布林的那個欄位為dessport在delphi combobox items為-1和0 而當aaa form2所選的combobox為yes時，會去自動對應到0一起寫入資料庫內， 而當aaa form2所選的combobox為no時，會去自動對應到-1一起寫入資料庫內， 因為網友是說當我在bbb table要參考這個欄位值時，不用去考慮yes或no.只要將o或-1帶出而就好了．因為我沒有程式的經驗，也不知這樣在delphi裡好不好作，願版主或其他的高手可以教導一下．不知這樣說明大家了不了解． ***************************************************************** 我會有這樣的問題是因為我的 aaa table 是在作一個全球的地點的程式． 而form2內的combobox是在作一個port的確定.如果那個地點是港口的話就選擇為yes.例如：高港是一個地點．但也是一個港口就要在combobox選為yes. bbb table 是在作一個港口的程式． 而裡面的內容也是有一些新增／修改／刪除的動作， 所以必須去參考到aaa table的combobox的yes 或no , 若今天我要在bbb table(港口的那個程式中）新增一個點為kaohsiung，那它就會檢查aaa table(全球的那個程式中),有沒有kaohsiung這個地點，若沒有就要先在aaa table內新增後，才可以再bbb table內建這個地點． ******************************************************************* 最後謝謝大家耐心看完 ． mamdy              

您要的是這樣嗎？

begin
  form1.adoquery1.insert;
  form1.adoquery.fieldbyname('code').asstring := (edit1.text);
  if ComboBox1.Items.Text = 'yes' then
    form1.adoquery.fieldbyname('CODE1').asstring = '0'
  else
    form1.adoquery.fieldbyname('CODE1').asstring = '-1';
  ...
end;

謝謝板主，你的答覆就己經解決了我的問題，再次謝謝你的幫忙哦． mamdy     *****************************************************************

引言: 您要的是這樣嗎？

begin
  form1.adoquery1.insert;
  form1.adoquery.fieldbyname('code').asstring := (edit1.text);
  if ComboBox1.Items.Text = 'yes' then
    form1.adoquery.fieldbyname('CODE1').asstring = '0'
  else
    form1.adoquery.fieldbyname('CODE1').asstring = '-1';
  ...
end;