如何解决DateToStr(Date)在win98下等于'01-12-13'的问题(100分)

S

Shepherd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #1

如何解决DateToStr(Date)在win98下等于'01-12-13'的问题
在win2000下DateToStr(Date)='2001-12-13'
在win98下的Date是否等于在win2000下的Date
望各位大侠指教

 

F

flintsoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #2

没遇到过这种问题，你可以变换一下
FormatDateTime('yyyy-mm-dd',Date)这样不管98还是2000都一样了啊。

 

Z

zhangkan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #3

自己在程序中定义好程序中的日期格式,不与系统的冲突.
procedure InitDate;
var s:boolean;
begin
DateSeparator := '-';
shortdateformat:='yyyy-mm-dd';
ShortTimeFormat:='hh:mm:ss';
s:=application.UpdateFormatSettings;
end;
这样在你的程序中就统一日期格式了.你再DateToStr也不用担心了.这应该是你的WIN系统中
日期格式定义成这样了.

 

T

terry_lzs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #4

zhangkan的方法好，这样在你的程序范围内可自定义日期格式，而且在需要修改的时候无需
象使用formatdatetime那样到处去修改，只要修改一个地方，程序里的时间格式就都统一了
而且还不会影响到系统设置。

 

C

Celestial dog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #5

zhangkan的不错

 

P

pisky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #6

对！zhangkan的不错

 

S

Shepherd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-13

• #7

接受答案了.