请问怎样获知系统日期类型的分隔符(50分)

Z

Z_JJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #1

我想strtodate('2002-01-01'),如果系统日期分隔符是'-'就能通过,但如果在控制面板-区域选项中把日期分隔符改为'.'或'/'就会报错
请问如何解决通用性问题

 

老

老人家

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #2

up

 

Q

QuickSilver

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #3

这样试试

shortdateformat:='YYYY-MM-DD';
DateSeparator := '-';
strtodate('2002-01-01');

 

Z

zsalean

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #4

if copy(datetostr(date()),5,1)<>'-' then
showmessage('error');

 

Y

yanghai0437

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #5

DateSeparator日期分隔符
TimeSeparator时间分隔符
在编程的时候直接用DateSeparator:='-';就可以了。

 

H

holly888

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-22

• #6

GetlocalInfo

 

Z

Z_JJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-23

• #7

多人接受答案了。