那位大哥帮帮忙，如何把string型变为日期/时间型！

Question

日期的形式为:例如2003-05-08
时间的形式为：08:10:00
都是字符串类型。
如何把它们变为日期，时间型？
我要进行时间前后的比较呀。

Answer 1

StrToDate
ADate := StrToDate(Edit1.Text);

Answer 2

那这两个函数对要转变的字符串有没有什么要求？
比如说2003-05-18还是2003-5-18
还是别的类型？
time没有秒能不能识别出？

Answer 3

2003-05-18 2003-5-18都可以
time没有秒也能识别出

Answer 4

Format('yyyy-mm-dd hh:mm:ss',[Edit1.Text])

Answer 5

ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！ENCODEDATETIME（）！！！！！

Answer 6

函数原形：
function EncodeDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word):TDateTime;

Answer 7

StrToTime(Edit1.Text);
StrToDate(Edit1.Text);

Answer 8

ShowMessage(DateTimeToStr(StrToDateTime('2003-05-20 14:00:00'))) ;  
  uses DateUtils ;  ShowMessage(FormatDateTime('yyyy-mm-dd hh:nn:ss',EncodeDateTime(2002,05,20,14,0,0,0))) ;

Answer 9

var
AString:AnsiString;
ADateTime:TDateTime;ADateTime:=StrToDate(AString);