DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: KfnqDuxw
今日帖子: 26
在线用户: 31
导航: 论坛 -> 数据库专区 斑竹:liumazi,waterstone  
作者:
男 cxjkx (想飞的菜鸟) ★☆☆☆☆ -
盒子活跃会员
2004/5/6 22:25:30
标题:
如何验证日期的有效性 浏览:1027
加入我的收藏
楼主: 在输入一个字符串的时候,怎么验证其是否是有效的日期,比如maskedit中输入了,一个2003-02-29 在下一个控件得到焦点的时候,能够判定输入的日期是否正确,???
----------------------------------------------
-
作者:
男 sephil (NAILY Soft) ★☆☆☆☆ -
盒子中级会员
2004/5/6 22:39:24
1楼: 在MaskEdit的OnExit事件中去判断

procedure TForm1.MaskEdit1Exit(Sender: TObject)
begin
  if not 日期有效 then 
  begin
    MaskEdit1.SetFocus;
    raise Exception.Create('日期无效');
  end;
end;
怎么验证自己写吧
----------------------------------------------
Copyright 2008 ? NAILY Soft

Click here to redirect to my home
Click here to redirect to my blog
作者:
男 cxjkx (想飞的菜鸟) ★☆☆☆☆ -
盒子活跃会员
2004/5/8 13:50:30
2楼: 我就是不知道怎么验证啊,我知道在哪个事件中写,就是不知道怎么写这个过程
----------------------------------------------
-
作者:
男 ylxie (xxx) ★☆☆☆☆ -
盒子活跃会员
2004/5/8 17:17:08
3楼: 这不是很简单,
try
  StrToDate(时间串);
except
  ShowMessage('非法时间串');
end;
就解决了  

----------------------------------------------
-
作者:
男 power_source (power) ★☆☆☆☆ -
盒子活跃会员
2004/5/8 17:27:12
4楼: try
  strtodate(maskedit.text)
except
  showmessage('时间错误')
end;
----------------------------------------------
我真的不会!
作者:
男 ruiwu_2001 (金武) ★☆☆☆☆ -
盒子活跃会员
2004/5/8 17:55:20
5楼: 同意楼上的看法~~
   但是怎么样色设定输入的格式呢
   比如:[    ][     ][      ];在括号李填写字符,在第一个括号里输入4位,然后游标跳到的2个括号,当删除时至删除括号里的字符保留括号~~~
----------------------------------------------
-
作者:
男 cxjkx (想飞的菜鸟) ★☆☆☆☆ -
盒子活跃会员
2004/5/10 9:29:34
6楼: 用maskedit来限制输入就行
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行89.84375毫秒 RSS