登录
首页 » Delphi源码 » Delphi 使DBGrid支持鼠标滚轮

Delphi 使DBGrid支持鼠标滚轮

于 2022-04-12 发布 文件大小:5.98 kB
0 201
下载积分: 2 下载次数: 1

代码说明:

Delphi 使DBGrid支持鼠标滚轮,测试前请确保程序已连接好数据库,否则会有很长一段时间反应,读取的数据会显示在DBGrid控件中,请在DBGrid组件中滚动鼠标滚轮,可将整个列表上下滚动,便于浏览数据,这个功能在一些软件中经常会遇到,具体编写思路请下载源码研究。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Delphi在窗口中单击左键弹出菜单
    Delphi在窗口中单击左键弹出菜单,在运行的窗体空白外,单击鼠标左键,弹出主菜单,其实和右键 菜单 是一样的原理,希望通过这个简单的例子,了解自定义窗口菜单的实现方法。
    2023-09-08 18:20:03下载
    积分:1
  • Delphi 应用程序背景与桌面融合在一起
    Delphi 应用程序背景与桌面融合在一起,运行后,显示windows 桌面上的内容,显示壁纸,拖动窗口移动,桌面背景并不移动,好像是一个桌面相框一样,实现代码:   for i:=0 to ControlCount-1 do   if Controls[i] is TGraphicControl then   begin    //使TLabel组件不透明显示    Controls[i].perform(WM_PAINT, TLabel(Controls[i]).canvas.handle, 0);   end;
    2022-02-02 23:31:59下载
    积分:1
  • Delphi 演示使用演示Brush对象的各种风格
    Delphi 演示使用演示Brush笔刷对象后生成的各种风格,一种演示了7种笔刷效果,定义了一个存储绘图风格的7维数组,然后使用For循环对绘图风格数组赋值,然后使用Canvas.Brush.Style来预览风格。这些笔刷风格都是浅色彩的风格。
    2022-07-08 18:13:17下载
    积分:1
  • Delphi获取BMP图片指定点RGB值
    delphi获取图片指定点RGB颜色值,载入一张BMP图像,鼠标单击图像任意处,将获取该处的RGB颜色分量图。任何一种颜色都是由RGB分量值构成,获取这些分量值,就可以改变这些值,从而改变颜色,为程序的进一步处理提供基础保障,获取RGB颜色分量,相关代码如下:   procedure TForm1.SpeedButton1Click(Sender: TObject);   begin    if OpenPictureDialog1.Execute then    begin    image1.Picture.LoadFromFile(OpenPicturedialog1.FileName);    Form1.Canvas.Draw(0,0,image1.Picture.Bitmap);    end;   end;
    2023-09-03 19:00:03下载
    积分:1
  • Delphi开发的模型飞机测控平台 附
    Delphi开发的模型飞机测控平台 附源代码,里面主要涉及多线程操作、GPS、传感器、端口操作等一系列系统控制的技巧,还包括了许多操作函数,比如绘制飞行轨迹的函数、绘制坐标刻度的函数、用户界面读取发送数据指令的函数、还有线程的同步、线程互斥等。   由于有调试目的,如果要求发送字符格式的数据,就直接发送用户输入的字符串,其他情况下,都是发送打包好的数据矩阵。   调用其它函数实现发送串口数据的功能。注意函数GetData还没有实现线程的互斥,目的是把发送的数据保存在各个线程中。   在此提示: 由于传输系统总会有一定的吴码率,那么为了避免轨迹图出现问题,例如坐标范围过大需要除去粗大误差,考虑到模型飞机的飞行速度不会超过10m/s,考虑到数子传输系统的下传速度,设定如果位置变化超过20m就去掉。
    2022-08-16 19:54:45下载
    积分:1
  • 获取windows System目录路径-Delphi示例
    Delphi获取windows System目录路径,这个比较简单,觉得没啥用,只是可以练习一下GetSystemDirectory函数如何使用,下面分享出核心的代码,完整代码需要您下载哦:   begin    GetMem(SysDir,255);    GetSystemDirectory(SysDir,255);    Edit1.Text := SysDir;   end;
    2022-03-18 16:21:27下载
    积分:1
  • Delphi版智能图片放大器
    Delphi版智能图片放大器,用滑块改变放大倍率,向左滑,则放大位数变大,反之则变校打开程序后,鼠标在图片区域移动,即可把鼠标悬停区域的图像放大显示N倍,放大位数就是刚才提到的,滑块来调整的放大位数,部分代码可参考如下:   Const //定义放大的区域    dSide=50;//区域大小   var    sSide: Integer;//放大比例[1至100],1为最大100为缩小    msHide: Boolean;    OldX,OldY,NewX,NewY: integer;    Dest,Source: TRect;   {$R *.DFM}   Procedure TForm1.ImageFD(x,y,Side: Integer);//定义放大区域及放大过程   begin    sSide:=30; //初始化放大比例    msHide:=True;    //Canvas.CopyMode:=cmSrcCopy;    image1.Picture.Assign(image2.Picture);   end;   详细情况请下载源码后查看Unit1.pas文件。
    2023-04-17 17:00:04下载
    积分:1
  • 在Delphi中进行 YCrCb RGB 颜色值转换
    在Delphi中进行 YCrCb RGB 颜色值转换,载入一张测试图片,右侧显示的转换后的颜色图像,文本框中显示的是各个转换过的颜色值。希望通过这个Delphi例子,帮你了解一下YCrCb向RGB颜色值的转换过程,转换方法和思路,本源码中则是具体的实战代码,请下载后研究。
    2022-05-23 08:16:07下载
    积分:1
  • Delphi 改变当前鼠标样式
    Delphi 改变当前鼠标样式,这个样式比较个性了,把箭头状的鼠标指针替换成了一幅图像,还有动画效果。具体实现,请下载本源码一看究竟。本程序具备的功能是可以选择的,用户可选择改变鼠标的形状是否是当前窗口或系统,选择当前窗口则只会在本测试程序的窗口中改变鼠标的形状。
    2023-07-31 03:10:03下载
    积分:1
  • Delphi获取从开机到现在CPU运行的周期数
    Delphi获取从开机到现在CPU运行的周期数,不是获取开机时间多长,是CPU的周期数,显示的值为数字字符串,运行效果如示例截图所示。代码段:   begin   Edit1.Text := inttostr(periodicity);   end;
    2022-07-05 04:51:29下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载