var S:String; sDate:TDateTime; begin S:='2014-11-7 21:00:00'; ShortDateFormat := 'yyyy-MM-dd'; //指定格式即可 DateSeparator := '-'; sDate:=StrToDateTime(S); end; var S:String; sDate:TDateTime; begin S:='2014-1 你的当前访问异常,请进行认证后继续阅读剩余内容。 提交