没有合适的资源?快使用搜索试试~ 我知道了~
DBGrid控件技巧集

温馨提示
日常开发过程,DBGrid是很常用,但标准的DBGrid往往可能无法解决一些特殊应用场合,比如,自绘网格线颜色、显示CheckBox等。 该技巧集里实现了一些日常我们开发过程所需要,但标准控件不提供的功能。
资源推荐
资源详情
资源评论











窗体顶端
Dbgrid 使用技巧(上)
在 语言的数据库编程中,是显示数据的主要手段之一。但是
缺省的外观未免显得单调和缺乏创意。其实,我们完全可以在我们的程序
中通过编程来达到美化 外观的目的。通过编程,我们可以改变 的
表头、网格、网格线的前景色和背景色,以及相关的字体的大小和风格。
以下的示例程序演示了对 各属性的设置,使 显示的表格就像网
页中的表格一样漂亮美观。
示例程序的运行:
在 上放置 、、三个数据库组件,设置
相关的属性,使 能显示表中的数据。然后,在 的
事件中键入以下代码,然后运行程序,就可以看到神奇的结
果了。本代码在 、 !环境下调试通过。
"# $%"&'()
*%"*)%+,)%")%
"-)
.%,)
',
/,01)
22定义表头的字体和背景颜色:
/%3!$"- 4
',
$"- 56 " 7%38宋体8)22字体
$"- 56 " 9%3)22字体大小
$"- 56 " %3:!!!!!!;)22字体
颜色$红色-
$"- 56 " %3:!!!!;!!)22背景色$绿
色-
)

22隔行改变网格背景色:
/ *7<3!
$"- . %3+/=22定义背景颜色
$"- . %3*$><><<?-)22定
义背景颜色
22定义网格线的颜色:
/$*>>>-)
$"- .22画 的边框
',
@ %3:!!;!!!!)22定义画笔颜色$蓝色-
#."$* A/>* -)22画笔定位
A"$* *,>* -)22画蓝色的横线
@ %3:!!!!;!!)22定义画笔颜色$绿色-
#."$* *,>* "-)22画笔定位
A"$* *,>* -)22画绿色的竖线
)
)
<!!?44B%!B%C<问题%4隔行改变 网格颜色 在
上放置 、、三个数据库组件,设置相关
的属性,使 能显示表中的数据。然后,在 的
事件中键入以下代码,然后运行程序
代码%
" $%"&'()
*%"*)
%+,)%")%"-)

.%,)
',
/,01)22隔行改变网格背景色:
/ *7<3!
$"- . %3/'=22定义背景颜色
$"- . %3*$><><<?-)22定
义背景颜色
22定义网格线的颜色:
/$*>>>-)
$"- .22画 的边框
',
@ %3:!!;!!!!)22定义画笔颜色$蓝色-
#."$* A/>* -)22画笔定位
A"$* *,>* -)22画蓝色的横线
@ %3'/)22定义画笔颜色$兰色-
#."$* *,>* "-)22画笔定位
A"$* *,>* -)22画绿色
)
)
用 0 中的 ' 未能通过,颜色没有隔行变化。
<!!?44B%<%!在 的 中插入其他可视组件 提
供了功能强大的 组件,以方便进行数据库应用程序设计。但是如果我们仅
仅利用 组件,每一个获得焦点()只是一个简单的文本编辑框,不方

便用户输入数据。 也提供了一些其他数据组件来方便用户输入,比如
'1,=1 等组件,但这些组件却没有 功能强
大。 能不能象 D1 那样让 中获得焦点网格可以是其它
可视数据组件以方便用户呢?其实我们可以通过在 中插入其他可视组件来
实现这一点。
对 处理的内部机制,就是在网格上浮动一个组件——0 组
件。你输入数据的网格其实是浮动 0 组件,其他未获得焦点地方不过是图像
罢了。所以,在 中插入其他可视组件就是在网格上浮动一个可视组件。因
此任何组件,包括从简单的 '=1 到复杂的对话框,都可以在 中
插入。下面就是一个如何在 中插入 '1 组件的步骤,采用同样
的办法可以插入其他组件。
、在 C ! 中新建一个项目。
<、分别拖动的 E 组件板上 、"',
组件板上 ,'1 四个组件到 上。
?、设置各个组件的属性如下:
/ 对象 属性 设定植
8在 中插入 0 组件示例8
"'
"''70#&
"'78 8
E."
'10F

D'
,+ 8男8G8女8
注意:我在这里用了 " '/,那是反映教职工的性别,只能是“男”或者是
“女”。
C、 事件是绘制单元格,当获得焦点网格所对应的字段与组合框
所对应的字段一致时,移动组合框到获得焦点的网格上,并且使组合框可视,从而
达到在 指定列上显示 '1 的功能。设置 的
& 事件如下:
" $%"&'()*%
"*)%")%"-)
',
/$,-
',
/$ 73'1 -
',
'1 A/%3* A/H A/)
'1 "%3* "H )
'1 %3* *,4* A/)
'1 I,%3* 4* ")
'1 D'%3")
)
)
)
、 指定单元格未获得焦点时不显示 '1,设置 的
&01 事件如下:
剩余63页未读,继续阅读
资源评论

- ecgnis2017-04-18不错,很有用的资料,谢谢!
- vancolsing12015-08-31不错的东东,赞一下!!~
- QCCily2013-04-04不错,很有用的资料,谢谢!
- 奋斗鱼2012-10-25下载了,看了还不错

天行归来
- 粉丝: 99
- 资源: 5
上传资源 快速赚钱
我的内容管理 展开
我的资源 快来上传第一个资源
我的收益
登录查看自己的收益我的积分 登录查看自己的积分
我的C币 登录后查看C币余额
我的收藏
我的下载
下载帮助


会员权益专享
安全验证
文档复制为VIP权益,开通VIP直接复制
