| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2024/3/15 9:49:31 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 请问DBGridEh多表头怎样显示不同的颜色，如图：
- |
|||||
| 作者： |
|
2024/3/15 9:57:52 | ||||
| 1楼： | https://blog.csdn.net/xiaobin_zb/article/details/118335079 ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 10:34:40 | ||||
| 2楼： | 你好！我想显示的是表头的颜色，数据行的颜色仍为白色。 ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 11:05:25 | ||||
| 3楼： | 官方demo: Demos\DBGridEh.CustomTitleDraw OnGetMultiTitleParams
SPAM |
|||||
| 作者： |
|
2024/3/15 13:45:08 | ||||
| 4楼： | 请问你用的什么版本的DBGridEh,我用的3.6的，没看到OnGetMultiTitleParams这个事件。 ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 14:05:12 | ||||
| 5楼： | DBGridEh1.OnGetTitleParams := DBGridEh1GetMultiTitleParams; DBGridEh1.OnDrawTitleCell := DBGridEh1DrawTitleCell; ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 14:29:13 | ||||
| 6楼： | procedure TForm1.FormCreate(Sender: TObject); begin DBGridEh1.OnGetTitleParams := DBGridEh1GetMultiTitleParams; end; procedure TForm1.DBGridEh1GetMultiTitleParams(Grid: TCustomDBGridEh; Params: TDBGridDrawTitleCellParamsEh); var ForeInsideRect: TRect; begin if (Params.Column = nil) then begin if (Params.MultiTitleNode <> nil) and (Params.MultiTitleNode.Text = 'Vendor of parts') then begin Params.Font.Size := 12; Params.Color := RGB(230,255,220); // $007DBEFF; Params.SecondColor := clWhite; //$000080FF; ForeInsideRect := Params.ForeInsideRect; ForeInsideRect.Left := ForeInsideRect.Left + 20; Params.ForeInsideRect := ForeInsideRect; end else begin if Params.MultiTitleNode.Text='Vendor Number' then Params.Color := $000080FF // $007DBEFF; else if Params.MultiTitleNode.Text='Vendor Name' then Params.Color := $007DBEFF; end; Params.Font.Style := [fsBold]; end; end; ---------------------------------------------- SPAM |
|||||
| 作者： |
|
2024/3/15 15:02:48 | ||||
| 7楼： | 您好！OnGetTitleParams这个属性也没有， 是不是我的版本太低的原因。 ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 15:09:08 | ||||
| 8楼： | 3.6确实太老了，现在都是10.X，最新已经11.1了 ---------------------------------------------- - |
|||||
| 作者： |
|
2024/3/15 15:27:50 | ||||
| 9楼： | OnGetTitleParams这个事件在Public里，不在Published里面，在对象编辑器上看不到的，要用代码实现 ---------------------------------------------- 我在马路边，看到一分钱，刚要弯腰捡，原来是口痰，我靠...谁吐这么圆! |
|||||
| 作者： |
|
2024/3/15 15:30:24 | ||||
| 10楼： | 楼上你确定？
- |
|||||
| 作者： |
|
2024/3/15 15:59:02 | ||||
| 11楼： | 楼上什么版本的，我的EhLib 9.0确实没有，我看源码了，确实不在published里面 ---------------------------------------------- 我在马路边，看到一分钱，刚要弯腰捡，原来是口痰，我靠...谁吐这么圆! |
|||||
| 作者： |
|
2024/3/15 16:06:18 | ||||
| 12楼： | 我的是这个样子的：
我在马路边，看到一分钱，刚要弯腰捡，原来是口痰，我靠...谁吐这么圆! |
|||||
| 作者： |
|
2024/3/15 19:17:02 | ||||
| 13楼： | 我这个是10.2，手头只有9.5的码已经定义在published里了 ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
