会delphi的大侠们来看下，刚学Delphi，按书上编译就是过不了下面是原代码，
Procedure tform1.button1click(sender:tobject);
Var
Number:integer;
Begin
Number:=strtoint(edit1.text);
Case number of
1,3,5,7,9:label2.caption:='奇数';
0,2,4,6,8:label2.caption:='偶数';
10..100:
Begion
Label2.caption:='在10到100之间';
form1.color:=clblue;
End;
Else
Label2.caption:='大于100或为负数';
end;
End;
我编译的时候总是提示Could not compile used unit'unit1.pas'。控件是一个编辑框，两个标签，一个按钮。这是我用手机发的代码可能不太标准，没办法家里没网线。大侠们给指点下吧
