我是使用BDE 的TABLE來作資料庫的連結，我需要一個DateTimePicker的功能， 但是不知如何把它的內容值連到TABLE的資料庫中，應該是要打程式碼，但是 要打在哪還有要打什麼就不知道了，可否指點一下......謝謝

您好!    一般來講, 資料指針的移動很頻繁, 即使是移動DBGrid元件的ScrollBar(捲軸)也會触發這樣的事件, 所以在Browse(瀏覽)資料的部分, 您可以將程式碼寫在DataSource元件的OnDataChange事件中, 以Table元件為例, 程式碼如下:

begin
  DateTimePicker1.Date := Table1.FieldByName('日期').AsDate;
  ...//此處為其它欄位的內容, 語法相同以上日期欄位部分
   end;

//以上程式碼就可以在瀏覽資料的時候, 即時的在DateTimePicker1中反應出對應日期欄位的Date內容, 請注意, 此方法僅在DateTimePicker元件的Kind屬性值為dtkDate時有效. 另外, 有關新增和修改資料的程式碼, 請將程式碼分別寫在触發資料新增(Insert)和資料修改(Edit)的事件中, 以下程式碼以ButtonInsert和ButtonEdit來為例:

ButtonInsert按鈕OnClick事件中
begin
  Table1.Insert;
  Table1.FieldByName('日期').AsDate := DateTimePicker1.Date;
  ...//此處為其它欄位的內容, 語法相同以上日期欄位部分
  Table1.Post;
  ShowMessage('新增資料成功');
end;    ButtonEdit按鈕OnClick事件中
begin
  Table1.Edit;
  Table1.FieldByName('日期').AsDate := DateTimePicker1.Date;
  ...//此處為其它欄位的內容, 語法相同以上日期欄位部分
  Table1.Post;
  ShowMessage('修改資料成功');
end;

===================================================================== 以上部分, 是將Post方法和Insert或Edit結合在一起寫, 如果Post按鈕需要分開處理的話, 您可寫成如下:

ButtonInsert按鈕OnClick事件中
begin
  Table1.Insert;
end;    ButtonEdit按鈕OnClick事件中
begin
  Table1.Edit;
end;    ButtonPost按鈕的OnClick事件中
begin
  Table1.FieldByName('日期').AsDate := DateTimePicker1.Date;
  ...//此處為其它欄位的內容, 語法相同以上日期欄位部分
  Table1.Post;
  ShowMessage('資料異動成功');
end;

注意各個欄位對應的顯示元件(如以上的DateTimePicker1)的形態設定要正确 參考看看! ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/10/05 00:29:20

------
忻晟