请问题这段代码有什么错呢?
delphi xe8和xe10都报 Duplicate case label 错呢?
procedure TForm1.FormCreate(Sender: TObject);
var
c: Char;
begin
case c of
#130:
ShowMessage(#130);
#131:
ShowMessage(#130);
#132:
ShowMessage(#130);
#133:
ShowMessage(#130);
#134:
ShowMessage(#130);
#135:
ShowMessage(#130);
#136:
ShowMessage(#130);
end;
end;