delphi如何在TDBGrid奇偶行显示不同的颜色,即隔行换颜色-CSDN论坛

delphi如何在TDBGrid奇偶行显示不同的颜色,即隔行换颜色

Delphi > VCL组件开发及应用

收藏回复

[问题点数：20分，结帖人qlonsh]

⋅面对家庭工作压力，如何选择 ⋅怎么向EXCEL插入图表 ⋅delphi如何在EXCEL插入多条Y轴图表 更多帖子 关注私信空间博客 qlonsh 等级 本版专家分：108 结帖率 94.23%: delphi如何在TDBGrid奇偶行显示不同的颜色,即隔行换颜色

2007-12-03 15:36:59

点赞只看楼主引用举报楼主收起

展开阅读全文

⋅linux和xp系统的问题,默认的是linux启动，不小心拿分区工具格式化了，现在启动不了机子，怎么办？ ⋅linux和xp系统的问题,默认的是linux启动，不小心拿分区工具格式化了，现在启动不了机子，怎么办？ ⋅redhat 9.03怎么注册 更多帖子 关注私信空间博客 luoye96 等级 本版专家分：30: for(int i=0;i<DBGrid1.Columns.Count;i++)
{
    if(i%2==0)
      DBGrid1.Columns.Items[i].Color=clAqua;
    else
       DBGrid1.Columns.Items[i].Color=clInfoBk;
}

2007-12-03 16:09:05

点赞只看TA 引用举报 #1得分 5

⋅linux和xp系统的问题,默认的是linux启动，不小心拿分区工具格式化了，现在启动不了机子，怎么办？ ⋅linux和xp系统的问题,默认的是linux启动，不小心拿分区工具格式化了，现在启动不了机子，怎么办？ ⋅redhat 9.03怎么注册 更多帖子 关注私信空间博客 luoye96 等级 本版专家分：30: for(int   i=0;i <DBGrid1.Columns.Count;i++)
{
        if(i%2==0)
            DBGrid1.Columns.Items[i].Color=clAqua;//颜色一
        else
              DBGrid1.Columns.Items[i].Color=clInfoBk;//颜色二
}

2007-12-03 16:09:51

点赞只看TA 引用举报 #2得分 5

⋅想买个 Nokia 的手机,大家帮忙推荐一下,价格大概 2k 左右. ⋅XXX显卡 ⋅本本问题，请教一下大家。 更多帖子 关注私信空间博客 hmzgz81 等级 本版专家分：5284: 这种问题用搜索一下一大堆帖子！

下面这个是在大富翁上搜出的：

这是让DBGrid隔行的颜色不同
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if( gdSelected in State)then
  //如果是被选中的
  begin
    DBGrid1.Canvas.Brush.Color:=clBlue;
    //选中的背景色为clBlue
    DBGrid1.Canvas.Font.Color:=clYellow;
    //选中的字体颜色为clYellow
  end
  else
  if self.DataSource1.DataSet.RecNo mod 2=1 then
     //用self.DataSource1.DataSet.RecNo mod 2
     //来判断行数产生隔行
    DbGrid1.Canvas.Brush.Color:=clRed
  else
    DBGrid1.CanVas.Brush.Color:=clWhite;

  DBGrid1.DefaultDrawcolumnCell(rect,DataCol,Column,State);
  //其他默认
end;

2007-12-03 17:09:33

点赞只看TA 引用举报 #3得分 10

收起

收藏回复

qlonsh

等级：

关注私信 TA的帖子

delphi中给TDBGrid上颜色: delphi中给TDBGrid上颜色 ; c++builder 中给TDBGrid上颜色

delphi实现TDBGrid选中行单元格按钮的显示: 2.监听TDBGrid的DrawColumnCell事件，在事件处理中 if gdSelected in state then begin if (Column.FieldName = ' ' ) then begin spsknbtnDelete.Left := Rect.Left + spskndbgrdForder.Lef

delphi dbgrid行颜色改变: 把 dgRowSelect 设为True, 在option里面. // DBGrid1的OnDrawColumnCell事件 if ((State = [gdSelected]) or (State=[gdSelected,gdFocused])) then begin DBGrid1.Canvas.Font.Color :=...

Delphi在DBGridEh改变选中行颜色: 运行效果:选中行变为蓝色步骤1:设置dbgrid的options的dgrowselect为true. 步骤2:在dbgrid的ondrawcolumncell事件里面写上: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; ...

delphi中TDBGrid的使用: procedure TMainForm.DBGrid1DrawColumnCell(Sender: TObject;const Rect: TRect; DataCol: Integer; Column: TColumn;State: TGridDrawState);var i :integer;beginif gdSelected in State then Exit;...

delphi 数据库显示的TDBGrid配置: 一、先在form 中添加TDGrid 二、添加以下3个数据库控件到form中 TADOConnection主要作用是连接数据库(或说连接数据源) TADOQuery组件连接数据源，并在SQL属性中输入SQL语句。（初始数据源Datasource） TDataSource...

Delphi TDBGrid自定义布局: Delphi TDBGrid自定义布局，可以按用户保存列顺序等。

tdbgrid_在Delphi的TDBGrid中显示和编辑MEMO字段: tdbgrid If you are developing database applications with tables containing MEMO fields, you'll notice that, by default, the TDBGrid component does not show the contents of a MEMO field inside a DBGri....

DBGrid间隔行颜色: procedure TFrmQueryData.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); var FindFieldCol: integer;... if DBGrid1.DataSou

Delphi通过RTTI实现TdxDBGrid，TDBGrid标题，列宽，显示顺序，字体大小颜色等动态配置: Delphi通过RTTI实现TdxDBGrid，TDBGrid标题，列宽，显示顺序，字体大小颜色等动态配置

delphi TDBGrid 结合TADOTable TDataSource控件，使TDBGrid显示时间等字段内容: 正常下，使用dbgrid在columns里添加好对应的表的字段后，就可以显示出关联的字段内容，但是datetime类型的字段，显示出来总是带有日期，我只想显示时间。解决办法: 双击TADOTable控件，弹出页面，可以在这里添加...

Delphi DBGrid显示颜色应用技巧: 在 Delphi 语言的数据库编程中，DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实，我们完全可以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程，我们可以改变...

Delphi中如何动态更改DBGrid的颜色: 在Delphi中如何动态更改DBGrid的颜色 DBGrid控件是一个有许多用户接口的显示数据库的控件，以下的程序告诉您如何根据显示的内容改变字体的显示颜色。例如，如果一个城市的人口大于200万，我们就让它显示为蓝色。...

Delphi.TDBGrid: 数据传递 TQuery->TDataSource->TDBGrid

TDBGrid选中行及获得所选中行数据: TDBGrid属性properties面板，设置...选中TDBGrid一行，对应其数据集中的一行自动呈选中状态，可直接操作数据集，即操作的是所选中的行数据，如： int SelectedID = DBGrid1->DataSource->DataSet->FieldByName("I

TDBGrid 隔行颜色: with(Sender as TDBGrid) do begin if ((State=[gdSelected])or (State= [gdSelected, gdFocused])) then begin Canvas.Font.Color:=clHighlightText; Canvas.Bru...

Delphi开发学习三：TdataSource 控件与 TDBGrid 控件使用实例: TdataSource 控件与 TDBGrid 控件在数据库开发中经常是成对出现的。作为数据库感应控件，TDBGrid控件主要作用是通过TdataSource控件连接数据集（如TADOQUery）以各种方式显示数据库中的数据，并提供客户端浏览的...

Delphi中实现TDBGrid列宽度自动调整: 在delphi中，grid是不能够自动调整列宽度的。其中也找过很多插件，而未能找到。于是自己写了一个函数用于实现这个功能，希望能帮到有需要的人。 [code="c++"]procedure TMainForm.FixDBGridColumnWidth...

Delphi在DBGrid中按照指定条件改变单元格的颜色: DBGrid的OnDrawColumnCell事件begin if (你需要指定的条件) then //如某一列... //满足条件时，显示的字体颜色为“红色”// DBGrid.Canvas.Brush.Color := clred; //满足条件时，显示的背景色颜色为“红色” en...

devexpress实现单元格根据条件显示不同的样式（颜色、字体、对齐方式，大小等）...: 这里是一个实现了将【第二列数据在表格000010和表格000015间的数据行标红,当然也可以设置字体颜色非单元格背景色，字体，字体大小等，这些属性都是可以直接配置的】效果图： 2、案例及源代码链接（无需积分下载）...

Delphi 实现TDBGrid组件的斑马线显示.rar: Delphi 实现TDBGrid组件的斑马线显示，也就是TDBGrid的不同行显示不同的颜色，设置不同的背景色，让数据显示更清淅，看上去像斑马线，俗称隔行换色，本例子是结合数据库实现的，若要正常运行，请先附加Database...

DBGrid 单双行显示不同颜色: procedure TfrmMain.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);var aIndex:Integer; aDBGrid:TDBGrid;begin if Sender is ...

隔行改变DBGrid网格颜色: Delphi5 - 隔行改变DBGrid网格颜色在 Form1 上放置 DBGrid1、Query1、DataSource1 三个数据库组件，设置相关的属性，使 DBGrid1 能显示表中的数据。然后，在 DBGrid1 的 onDrawColumnCell 事件中键入...

delphi 更改DBGrid 颜色技巧: 1、根据条件更改某一单元格的颜色 procedure TMainFrm.First_DGDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if DM....

dbgrid用两种颜色间隔分行显示: Delphi代码如下： procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin with

（转载）delphi实例TDBGrid用右键菜单复制行粘贴行: delphi实例TDBGrid用右键菜单复制行粘贴行这个从本质上来说就是DBGrid后台数据库的插入右键复制当前行的相关数据到临时变量点粘贴时，覆盖数据或插入数据！ db为数据库: 字段名id,name,string型通过adoquery...

怎样设置DBGrid标题行、所选记录行的行高度和行背景颜色,所选列宽度: 怎样设置DBGrid标题行、所选记录行的行高度和行背景颜色,所选列宽度 Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiDB/html/delphi_20061216115412271.html rt 1、Columns属性 2、OnDrawColumnCell...

智鼎(附答案).zip: 并不是完整题库，但是有智鼎在线2019年9、10、11三个月的试题，有十七套以上题目，普通的网申行测题足以对付，可以在做题时自己总结一些规律，都不是很难

Visio_2016: visio_2016下载安装，亲测可用，不需要破解，而且无秘钥。简单方便实用

APP内置IM 系统——从入门到千万级在线: IM （即时通讯）系统是一种大型实时系统，其对技术方面的要求非常高。在APP社交化的今天，很多APP都希望为自己的应用增加IM系统，但却不得其法。本课程抽丝剥茧，搭建一套简IM 系统，先让开发者了解如何实现这类系统，然后会不断的对系统进行扩展，并详述要支撑千万级别的用户，系统架构要经过哪些方面的演变，在每个阶段需要具体考量哪些因素；其中涉及到大型网络开发、协议的制定解析、数据库的优化、负载均衡、监控、测试等方面的知识。相信通过此课程，开发者对IM 系统将有一个全面的认识。 a:0:{}

相关热词 c#编译器学习 c#和其他语言相比 c# 什么是管道 c# 在ui线程中运行 c# 动态增加枚举 c# panel边框 c#调用dll报错 c# 编写dll c# dll修复工具 c# timer 多线程