登录
首页 » Delphi源码 » Delphi 实现TDBGrid组件的斑马线显示

Delphi 实现TDBGrid组件的斑马线显示

于 2023-05-29 发布 文件大小:241.27 kB
0 221
下载积分: 2 下载次数: 1

代码说明:

Delphi 实现TDBGrid组件的斑马线显示,也就是TDBGrid的不同行显示不同的颜色,设置不同的背景色,让数据显示更清淅,看上去像斑马线,俗称隔行换色,本例子是结合数据库实现的,若要正常运行,请先附加Database数据库中的SQLSERVER文件,附加后在本示例中修改数据库连接字符串即可。

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

发表评论

0 个回复

  • Delphi 图片颜色逐渐加深功能的实现
    Delphi演示如何将一张图片的颜色加深,类似于调整对比度,不过本效果不加入了渐变加深的动画效果,按住按钮图片一直变暗下去,要知空间,你可看下以下代码:   Bitmap:=image1.Picture.Bitmap;   image1.Height:= Bitmap.Height;   image1.Width:= Bitmap.Width;   for i:=0 to 255 do   begin    sleep(10);    for y:=0 to Bitmap.Height-1 do    begin    pixcolo:=Bitmap.Scanline[y]; //扫描每行像素颜色    for x:=0 to ((Bitmap.Width*3)-1) do    //递减颜色值,不同的递减值可改变不同的速度    if pixcolo[x]>0 then pixcolo[x]:=(pixcolo[x]-1);    end;    Image1.Canvas.Draw(0,0,Bitmap);    Application.ProcessMessages; //让Application去处理消息队伍中的消息   end;
    2022-03-23 16:34:19下载
    积分:1
  • Visual C# 调用声音控制对话框
    Visual C# 调用声音控制对话框,在windows Xp下表现挺好,在Windows7有些问题,调用的面板并不会显示出来,这是为何呢?windows调用 声音对话框的实例 ,基于Delphi7源码实现。
    2022-03-10 20:40:03下载
    积分:1
  • Delphi 隐藏或显示鼠标指针
    Delphi 隐藏或显示鼠标指针,在编译后运行本程序生成的Exe程序,在窗口中单击鼠标左键,鼠标会消失,被隐藏了,再次单击后鼠标重现,很好的演示了在Delphi中如何显示或隐藏鼠标的操作。
    2022-01-26 04:41:31下载
    积分:1
  • Delphi 快速查询文件
    Delphi 快速查询文件,比较老的代码,搜索文件的地址需要手工输入哦,查询的结果会显示在空白处。返回查询的代码如下:   List := TStringList.Create;//创建字符传列表   try    spec := ExtractFileName(filespec);//返回指定文件名    RFindFile(ExtractFilePath(filespec));//返回指定路径    Result := list;//函数返回值是List;
    2022-03-19 10:17:26下载
    积分:1
  • delphi 获取网页
    delphi 获取网页源码
    2023-01-22 10:05:04下载
    积分:1
  • 内存使用状态Delphi 探测并显示
    Delphi获取内存的使用状态并显示信息,这里是使用GlobalMemoryStatus来实现,有的是使用GetSystemInfo来获龋本程序可显示内存大小和可用内存,并显示进度条。不过我这台电脑是16G内存的Windows7 64位系统,程序可能没认出啊,下面是识别内存可用量的大小,仅供参考:   memo_status.dwLength := sizeof(memo_status);   GlobalMemoryStatus(memo_status);   Gauge2.Progress := (round((100*(memo_status.dwAvailPhys    / memo_status.dwTotalPhys))));   label1.Caption := inttostr(memo_status.dwAvailPhys);   label2.Caption := inttostr(memo_status.dwTotalPhys);
    2022-02-03 06:55:31下载
    积分:1
  • Delphi 限制窗口最大化显示
    Delphi 限制窗口最大化显示,当用户单击最大化按钮后,窗口稍微变大了一点,但并没有最大化,有时候,我们需要限制,不让窗口最大化,在编写实现此功能时,定义了WMGetMinMaxInfo,以下代码在函数中定义,用户操作按钮,激活函数:   with Message.MinMaxInfo^ do   begin   ptMaxSize.X := 400; //最大化时宽度   ptMaxSize.Y := 300; //最大化时高度   ptMaxPosition.X := 120; //最大化时左上角横坐标   ptMaxPosition.Y := 120; //最大化时左上角纵坐标   end;   Message.Result := 0; //通知Windows改变了minmaxinfo
    2022-01-24 18:38:10下载
    积分:1
  • Delphi IntToHex函数用法举例
    关于IntToHex,在Delphi中使用频率也是挺高的,不过像我这种菜鸟,对IntToHex的具体用法仍是不太熟悉,后来看了这个小程序,了解了一些,分享给大家,特别是以下代码会加深你对IntToHex函数的用法理解。   procedure TForm1.Button1Click(Sender: TObject);   var    S:integer;   begin    S:=2147483647;    showmessage(inttoHex(s,8));    showmessage(inttoHex(s,10));    showmessage(inttoHex(s,16));    showmessage(inttoHex(s,32));   end;
    2022-09-07 01:20:03下载
    积分:1
  • Delphi演示UniCode编、简体繁体互转的方法实现
    Delphi演示如何实现UniCode编码、汉字的繁简互转功能,同时将字符转换为unicode码值(十六进制):   常用编码:   codepage=936 简体中文GBK   codepage=950 繁体中文BIG5   codepage=437 美国/加拿大英语   codepage=932 日文   codepage=949 韩文   codepage=866 俄文   codepage=65001 unicode UTF-8   本例子中仅使用了936、950,如果你要进行其他语言的编码转换,仅需相应改变其中的编码值即可。
    2023-06-10 00:30:04下载
    积分:1
  • Delphi获取电脑CPU硬件型号名称
    Delphi获取电脑CPU硬件型号名称,这个可能不准确,我是64位 I5 3470 CPU,获取出来的是统称,不是太准确,可能是我系统的问题。不过这个代码是前几年书中的代码,现在的硬件发展快,也有可能是代码的问题,运行效果如下。   本获取CPU名称是根据注册表的方法获取的。
    2022-07-06 23:12:47下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载