字符转日期问题

liuqiang_sy 发布于 2007-05-20 21:03， 695 次点击

在edit中输入数值如:19851212这样的一个字符串,怎样能输出1985-12-12这样的日期型.

1 回复

aaron520882007-05-20 22:35

var MyDate:TDateTime;
Year,Month,Day:string;
begin
MyDate:=EncodeDate(1984,12,13);
edit1.Text:=datetostr(MyDate);
end;
这样吧，直接转我是不知道的，不过如果把19851212分成3个edit输入就简单很多了。
你看看吧