当前位置:主页>销售管理软件> 列表

日期比较大小 找客户关系管理软件

销售管理软件版1楼: 我已经把日期转换为2006 02 28 的样式(一定要这样的样式),用的是FormatDateTime,可是我却无法把它转换回2005-02-28,让其与NOW比较大小!
请各位帮忙!

2楼: 用 replace函数 将空格换为 - ,然后再转换为日期函数就行了。 如客户关系管理软件

3楼: if StrToDateTime(stringreplace(datastr, '' '', ''-'', [rfReplaceAll])) > Now then
{* 比较后操作 *}

4楼: 在delphi中用:FormatDateTime(''yyyy-mm-dd'',2006 02 28)

5楼: 中鼎
说的对

6楼: FormatDateTime(''yyyy-mm-dd'',2006 02 28)
这样能编译通过?

销售管理软件版7楼: 我觉得楼主提的这个问题很奇怪,既然你能把它转换成2006 02 28 的样式

转换回2005-02-28怎么不会了?

姑且认为你是拿表的字段来转换的。FormatDateTime(''yyyy-mm-dd'',adoquery.fieldbyname(''时间'').AsDateTime),把最初还没转换成2006 02 28 的样式的数据拿来转换更方便啊。

请楼主指正[:)]

8楼: procedure TForm1.Button1Click(Sender: TObject);
var
Str:String;
DT :TDate;
begin
Str:=''2006 02 28'';
Str:=StringReplace(Str,'' '',''-'',[rfReplaceAll]);
DT :=StrToDate(Str);
If DT < Now Then
ShowMessage(FormatDateTime(''yyyy-mm-dd'',DT));
end;

9楼: 多人接受答案了。