2012年6月28日
摘要: 发现cxMaskEdit的正则表达式很不错,于是将其剥离出来,以便可以移植到其它控件上,两个单元cxMaskEdit和cxRegExpr(代码贴在下面),这里给出简单的调用方法 :1、procedure TForm1.FormCreate(Sender: TObject);begin FRegExpr := TcxRegExpr.Create; re := TcxMaskEditRegExprMode.Create(Edit1); re.Compile('(Y | y)(es|ES)? | (N | n)o?');end;2、procedure TForm1.Edit1Chan 阅读全文
posted @ 2012-06-28 15:04 stwo 阅读(5104) 评论(0) 推荐(0) 编辑