Delphi(程序人生)

Delphi Programer DoubleCat

导航

2010年9月24日

YYYY-MM-DD的正则表达式

摘要： procedure TForm1.Edit1Exit(Sender: TObject);var theDate:string; reg : TperlRegex;begin theDate := Edit1.Text; reg := TPerlRegEx.Create(self); reg.Subject := theDate; reg.RegEx := '^((((19|20)\d{2})-(0... 阅读全文

posted @ 2010-09-24 21:37 DoubleCat 阅读(618) 评论(0) 推荐(0)