請問怎樣設定edit1的格式為日期格式,如2001/10/24.

Question

請問怎樣設定edit1的格式為日期格式,如2001/10/24.

Answer 1

用MASKEDIT就可以设置它的editmask属性就行了

Answer 2

兩種方法
1.strtodatetime(edit1.text)
2.用maskedit控件,設其editmask為9999:99:99

Answer 3

如果你硬要用EDIT的话也可以
在ONEXIT事件里面写
edit1.text:=formatdatetime('yyyy/mm/dd',strtodatetime(edit1.text))
不过这样如果你要先保证他输入的是2001-10-24这类的可以转换成
日期的字符串

Answer 4

ShortDateFormat := 'yyyy-MM-dd';
LongDateFormat  := 'yyyy-MM-dd';
TimeSeparator   := ':';
ShortTimeFormat := 'HH:MM';
LongTimeFormat  := 'HH:MM:ss';
然后再用edit1.text:=datetimetostr(now)