说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

如何对DBEdit组件中输入的数进行类型检查???

编辑:说三道四文库 发布时间:2018-01-16 11:25
HTML文档下载 WORD文档下载 PDF文档下载
如何对DBEdit组件中输入的数进行类型检查???
如DBEdit组件中的字段为日期型,如我输入不当,程序会出现消息框提示输入无效,我如何用自己的类型检查方法来屏蔽过去的消息框??
void __fastcall TOrganForm::DateDBEditChange(TObject *Sender)
{
TDateTime a;

        try{
        a=StrToDate(DateDBEdit->Text;);
        }
        catch(...){
        ShowMessage("登记日期非法!" );
        return;
        }

}
应改为DBEditExit()事件
TdateTime d1;
try{
     d1 = DateToStr(Edit1->Text);
     ShowMessage("是合法的日期!");
}
catch(...){
     ShowMessage("不是合法的日期!");
}
构建高可扩Web架构和分布式系统实战(下) API设计的十大最差和五大最佳实践 Hadoop:为什么RAID-0不行? 电子前沿基金会:实现互联网自由需翻越5座大山 安全无小事:2013年最令人期待的15家安全公司 上海薪水待遇如何?我这个水平能拿多少? 怎样让database login对话框不显示? 昨天晚上做了一个有关Borland C++ Builder x 的梦(是真的梦,不是想法!)。 什么是“呼吸现象”啊? 关于DBGRID的问题,对不起,我没有分,请大家帮帮我! 关于一个面试的问题? VB里有一个图表的控件,如果你有关于它的好例子,能给我发一个吗,本人感激不尽 谁知道用什么软件可以监控IE向外发出的信息? SQL求救,求遗漏数字。急啊 1纳米等于几米 1纳米等于几分米300升=()立方厘米50立方毫米 (x+y)/2+(x-y)/3=6 2(x+y)- javascript中 -13>>2 等于多少,为 240X780厘米等于多少平米,为什么?240X7 80克等于多少斤? 1纳米等于多少米 1飞米等于多少纳米?1飞米等于10-15米,纳米. 1纳米等于多少米 怎么得的 分析称土耳其宣布选中国导弹只是向欧美挪威峡谷小镇靠三面“巨镜”首次沐浴冬日本研究发现治疗糖尿病和代谢综合症物加拿大多伦多市长身陷吸毒疑案 拒绝辞万圣节当天加拿大机场查获借南瓜暗藏毒武汉将配专职区级人大常委会主任交通肇事案被告人全责比例高肉馅虽小监管决心要大星子派出所闻警而动破毒案佛冈男子娱乐场所贩毒被抓民国异梦妾的养儿攻略一路飞仙女配修仙记异界魔弓手宜州旅游无棣旅游玛纳斯旅游盈江旅游南丹旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘