文件名称：DBGrid3D (增加了鼠标滚轮的支持)
文件大小：8KB
文件格式：RAR
更新时间：2007-08-31 03:23:13
3D DB Grid Report报表类 滚轮
在原来TDBGrid的基础上增加了鼠标滚轮的支持: unit DBGrid3D; interface uses Windows, Messages, SysUtils, Classes, Controls, Grids, DBGrids; type TDBGrid3D = class(TDBGrid) private { Private declarations } protected { Protected declarations } public { Public declarations } published function DoMouseWheel(Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint): Boolean; override; { Published declarations } end; procedure Register; implementation function TDBGrid3D.DoMouseWheel(Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint): Boolean; begin if WheelDelta < 0 then Datasource.DataSet.Next; if wheelDelta > 0 then DataSource.DataSet.Prior; end; procedure Register; begin RegisterComponents('Samples', [TDBGrid3D]); end; end.
【文件预览】：
说明.htm
DBGrid3D (增加了鼠标滚轮的支持)
----DBGrid3D()
--------DBGrid3D.dcu(4KB)
--------DBGrid3DB.dcu(4KB)
--------DBGrid3D相关说明 .txt(53B)
--------DBGrid3D.pas(793B)
代码中国.txt
代码中国.url