程序错误

[lhyang761030]

请大家帮我看看这个怎么会不对，
var
strToCom:string;
Case Formatdatetime('dddd',now()) of
'星期日': strToCom:=strToCom+'00';
'星期一': strToCom:=strToCom+'01';
'星期二': strToCom:=strToCom+'02';
'星期三': strToCom:=strToCom+'03';
'星期四': strToCom:=strToCom+'04';
'星期五': strToCom:=strToCom+'05';
'星期六': strToCom:=strToCom+'06';

Else
showmessage('时间不合理'); }
End ;
是哪错了呀,提示ordinal type request

[Drate]

在PASCAL 中Case of语句的枚举条件不能是字符串型的，只能是整型

[立志做一个佳娃~]

Case of语句的中的条件只能是简单型类型，，楼主您看看帮助吧，

[立志做一个佳娃~]

楼主结贴哟，大家都需要专家分，，，