试下，自己继承的几个组件(For SQL Server) - CnVCL 组件包 - CnPack Forum

新警察

UID 40692
Digest Posts 0
Credits 5
Posts 1
点点分 5
Reading Access 10
Registered 2008-7-25
Status Offline

Post at 2008-7-25 16:41 Profile | Blog | P.M.

试下，自己继承的几个组件(For SQL Server)

TADOQueryU / TADOStoredProc : 在保存数据时，指定是否去除Null值（即自动将ftString置为‘’,ftInteger置为0,日期置为1900-01-01）,简单转换了下保存时的错误消息
TDBGridU: 回车键时光标移到下栏，若已经在最后一栏，则移到下一条记录的第一个栏位
TLabelU: 指定是否是必须填写的字段，自动改变显示颜色
TShapeU: 添加鼠标双击事件，当时帮一个朋友做酒店房间状态显示时写的，双击时以响应事件

欢迎添加更多功能，此版仅针对SQL SERVER 2000 英文版写的，改写为Oracle版应该也有用吧
QQ:315054403 MSN:dgdba@hotmail.com

Attachment: zClassGB.rar (2008-7-25 16:41, 49.8 K)
Download count 412

SQL Server + Delphi