VCL 自帶的數據庫導航 TDBNavigator 控制元件短小精幹算實用...但是...打從 Delphi 與 C++Builder 問世以來就存在著操作上的不協調......
在使用鼠標或鍵盤操作表格控制元件時...當移動位置至首筆(第一行)時...First 與 Prior 導航按鈕不應該處在 Enable 可按的情形...而移動位置至末筆(最後一行)時...Next 與 Last 導航按鈕也不應該處在 Enable 可按的情形...這在別的數據庫之表格或導覽控制元件並未見過 :
實際上 Bof 與 Eof 的邏輯位置在隔線上而非框格上...所以 Vcl.DBCtrls.pas 之 TDBNavigator 原代碼...將 Bof 與 Eof 當作物理位置來識別並不正確...必須做修正以符合實際上的操作 :
{ TODO -oxuware -c導航按鈕列 : 001 校正首筆末筆按鈕邏輯 }
//UpEnable := Enabled and FDataLink.Active and not FDataLink.DataSet.BOF;
UpEnable := Enabled and FDataLink.Active and (FDataLink.DataSet.RecNo <> 1);
//DnEnable := Enabled and FDataLink.Active and not FDataLink.DataSet.EOF;
DnEnable := Enabled and FDataLink.Active and
(FDataLink.DataSet.RecNo <> FDataLink.DataSet.RecordCount);經修正後導航標的位置正確 :
uj5u.com熱心網友回復：
支持1樓修改代碼。本人壓根不用TDBNavigator，而是自己撰寫一個。
uj5u.com熱心網友回復：
嘿嘿~ 1樓?
有現成的可用何必多此一舉哩~
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/94528.html
標籤：數據庫相關
上一篇：關于創建dll檔案的小困惑