软件发布：可以在TStringGrid每个单元格中添加按钮及下拉框的控件

Hank 2003-07-18 03:54:32

http://www.csdn.net/cnshare/soft/18/18407.shtm

TEditingGrid控件主要是根据大家共同关心的在Grid中添加组件问题的一个简单解决方案！
TEditingGrid控件继承于TStringGrid，主要添加了以下属性：
property CellItems[ACol, ARow: Integer]: TCellEditItem;
property OnEditButtonClick: TNotifyEvent;
其中CellItems属性是TCellEditItem类型，控制每个单元格的类型，OnEditButtonClick事件是当设置单元格为按钮模式(esEllipsis)时单击此按钮所激活的事件。
TCellEditItem控件主要有两个属性：
property EditStyle: TEditStyle;
property PickList: TStrings;
其中EditStyle属性是控制各个单元格中按钮的类型(esSimple, esEllipsis, esPickList)，PickList属性是控制当单元格为下拉框模式(esPickList)时在下拉框中出现的值列表。

这是一个简单的版本，没有多少复杂功能，所以公开了源代码！
如果各位有兴趣，可以联合开发中国式的功能强大的表格！我现在正在做，基于TCustomDrawGrid控件，功能方面比这个强大的多，可以直接将Grid中的数据保存到Excel文件中，速度很快！

...全文

253 31 打赏收藏转发到动态举报

写回复

用AI写文章

31 条回复

切换为时间正序

请发表友善的回复…

发表回复

thebest123 2003-09-02

打赏
举报

学习，怎么把这个控件加到delphi6中呢？！

hawk_js 2003-09-02

打赏
举报

学习，谢谢；）

fenglaile 2003-08-19

打赏
举报

试试看，应该不错吧

fhuibo 2003-08-19

打赏
举报

试试先

diruser 2003-08-19

打赏
举报

jenemery 2003-08-04

打赏
举报

see先

kds 2003-08-04

打赏
举报

down
up

noall 2003-08-04

打赏
举报

可别扁我哦。

我用的stringgrid是advstringgrid，基本上可满足绝大部份的要求。

可惜最新版不是免费。

Hank 2003-08-04

打赏
举报

自己UP一下，现在是572

things 2003-07-29

打赏
举报

看看先

Hank 2003-07-29

打赏
举报

自己UP一下，现在是404

Hank 2003-07-25

打赏
举报

自己UP一下，现在是271

afei78223 2003-07-21

打赏
举报

Hank 2003-07-21

打赏
举报

到今天收到一些邮件，问如何安装，看来这些基础问题偶还得回答一下：
下载文件后，解压缩，然后：
1、Delphi的〖Component〗->〖Install Component〗->〖Browse〗选择压缩包中的EditingGrid.pas文件，也可以在〖Search Path〗中输入文件所在路径，然后〖OK〗
2、然后系统提示“package dclusr.bpl will be rebuilt. Continue?”选择〖Yes〗即可
3、保存dclusr.dpk

sand79 2003-07-20