zhenghaoxin 2015-09-15 14:29 采纳率: 0%
浏览 1598

请问题这段代码有什么错呢?

请问题这段代码有什么错呢?
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;

  • 写回答

6条回答 默认 最新

  • devmiao 2015-09-15 15:32
    关注

    label标签重复,看看完整的代码

    评论

报告相同问题?