(13)小问题。什么样的string 能 to date(20分)

  • 主题发起人 千中元
  • 开始时间

千中元

Unregistered / Unconfirmed
GUEST, unregistred user!
datetostr好说了,可是什么格式的string 才能 转换成date类型呢?
“yy-mm-dd" or "yyyy-mm-dd"?
or "mm-dd-yy" or "dd-mm-yy"
or "yyyy-mm-dd"....or ..or.???
 
L

liuchuanbo

Unregistered / Unconfirmed
GUEST, unregistred user!
yy-mm-dd" or "yyyy-mm-dd"
/
edit2.text:=datetostr(strtodate(edit1.text));
自己试一下
 
B

Babyfloppy

Unregistered / Unconfirmed
GUEST, unregistred user!
我也遇到过类似的问题,也是要求人输入date 和time ,我是用了很笨的datetimepicker那个控件做的,其实也可以用maskedit来做,就是限定用户的输入.

至于具体的什么样的string才能转化为TDateTime type,Delphi中有几个关于
时间的全局变量,是设定Delphi处理时间格式的,比如有长时间和短时间,具体实现
时好象又与你的windows设定有关(在控制面班里的区域设置).
而且delphi用于时间中间间隔的符号也是可以变的,依据人的设定。可以是
'-',也可以是'/'等等。
 
L

liuly

Unregistered / Unconfirmed
GUEST, unregistred user!
老千,告诉你一个办法,用VarToDateTime判断吧,它认识所有的日期格式哦,
除了你说的那些,还认识诸如“1999.12.01”,“December 6, 1969”,
“6-Apr-1998”,“1999年12月1日”,等等... ...

try
D3 := VarToDateTime(Edit2.Text);
flag := True;
except
on econverterror do
flag:=False;
end;
if flag=true then Edit1.Text := DateToStr(D3);

 

千中元

Unregistered / Unconfirmed
GUEST, unregistred user!
哎呀,老刘好久不见了。。(握手,拥抱的免,还没冲凉呢)
我的还不清楚现在到底有多少种日期格式?哪些是Delphi能认识的。。
 
L

liuly

Unregistered / Unconfirmed
GUEST, unregistred user!
呵呵,上面不是给出程序了吗?flag=TRUE的Delphi都认识
 
P

popeye

Unregistered / Unconfirmed
GUEST, unregistred user!
又学到一招,liuly你好
 

千中元

Unregistered / Unconfirmed
GUEST, unregistred user!
照您的意思我得先全部都实验一下?
算了,还是用最常用的吧。
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
905
SUNSTONE的Delphi笔记
S
I
回复
0
查看
391
import
I
S
回复
0
查看
930
SUNSTONE的Delphi笔记
S
S
回复
0
查看
754
SUNSTONE的Delphi笔记
S
顶部