delphi中的DBGRid滑鼠滾動事件

2021-05-21 14:57:54 字數 461 閱讀 9318

procedure onmousewheel(var msg :tmsg;var handled:boolean);

begin

if msg.message = wm_mousewheel then

begin

if msg.wparam > 0 then

begin

if dbgrid.focused then

begin

sendmessage(dbgrid1.handle,wm_keydown,vk_up,0);

end;

endelse

begin

if dbgrid.focused then

sendmessage(dbgrid1.handle,wm_keydown,vk_down,0);

end;

handled:= true;

end;

end;

Delphi 7 中DBGrid的排序。

procedure tfrmtracereport.dbgrid1titleclick column tcolumn var sortfield,fieldtitle string begin sortfield column.field.fieldname fieldtitle column.ti...

在Delphi的DBGrid中插入其他可視元件

delphi提供了功能強大的 dbgrid元件,以方便進行資料庫應用程式設計。但是如果我們僅僅利用dbgrid元件,每乙個獲得焦點 grid 只是乙個簡單的文字編輯框,不方便使用者輸入資料。delphi也提供了一些其他資料元件來方便使用者輸入,比如dbcombobox,dbcheckbox等元件,但...

在Delphi的DBGrid中插入其他可視元件

delphi提供了功能強大的 dbgrid元件,以方便進行資料庫應用程式設計。但是如果我們僅僅利用dbgrid元件,每乙個獲得焦點 grid 只是乙個簡單的文字編輯框,不方便使用者輸入資料。delphi也提供了一些其他資料元件來方便使用者輸入,比如dbcombobox,dbcheckbox等元件,但...