求大侠帮忙，case问题，代码贴出来了，请看看！

Question

case 语句只能是整数，枚举类型，子界；你用的是字符串类型，当然不行了。
你可以改为枚举类型。
如:
type 
  myColorType=(Red,Green,Blue,Yellow,Orange,Black)
var
myColor:myColorType以上程序未经过测试，不过大概正确。

Answer 1

好象 case Mycolor of  中的Mycolor必须是 integer类型才可以。

Answer 2

同意delphi_user(皮皮虾),他速度好快啊,呵呵。..

Answer 3

请看看，这是（片段）
错：missing operation orsemicolon??case idss of
        1:
         begin
       
        if i=7 then
                response.write('i<br>')
        else
                response.write('i');
        //end;
        end