請問各位高手.... 小弟還有一問...就是當我點選DBgrid的其中一欄位的時候...該如何將該欄位所代表的值顯示在bitbtn的caption上... 例如: 當我在dbgrid的欄位點選某一位老師..在旁邊由40個bitbtn所組成的課表就會顯示該位老師的空堂資料. 而當我點選另外一位老師的時候...就會顯示我點選老師的空堂資料....請問我應該如何著手.. 還有..當我要用dbnavigator的新增功能..新增一位老師的個人與空堂資料時...要如何才能將旁邊由40個bitbtn所組成的課表也變成一張新的課表(就是40個bitbtn的caption全部變成空白)...而不是上一位老師的課表.... 請各位高手指導......拜託..謝謝

引言: 還有..當我要用dbnavigator的新增功能..新增一位老師的個人與空堂資料時...要如何才能將旁邊由40個bitbtn所組成的課表也變成一張新的課表(就是40個bitbtn的caption全部變成空白)...而不是上一位老師的課表.... 請各位高手指導......拜託..謝謝

在進行新增時,滑鼠游標焦點不要在dbgrid上,應該可以解決您的問題

您好!    每個Bitbtn的Caption應都對應資料表中相應的欄位值吧? 可將如下程式碼寫在DataSource元件的OnDataChange事件中:

  Bitbtn1.Caption := Table1.FieldByName('欄位名').AsString;
  BitBtn2.Caption := ...以此類推

如果Form中的Bitbtn元件只有組成課表的40個而言, 可利用迴圈使每個Bitbtn元件的Caption屬性值更改為空白, 如下程式碼, 寫在資料感知元件(如Table, Query等)的AfterInsert事件中:

Var
  I : Integer;
begin
  For I:=0 to Form1.ComponentCount-1 do
    begin
      if Form1.Components[I].ClassType := TBitbtn then
        TBitBtn(Form1.Components[I]).Caption := '';
    end;
end;

參考看看! ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

感謝各位高手的指點..... 小弟正在努力嘗試中