如何正确制作 RAD Studio 格式的 case 语句?

Jer*_*dge 1 delphi code-formatting delphi-xe8

这是我不久前提出的先前问题的后续。

总而言之,我更喜欢将begin语句显示在同一行,而不是下一行。但是,因此,case使用默认设置时语句的格式不太友好:

case SomeEnum of
  seOne: begin

    end;
  seTwo: begin

    end;
  seThree:
    ;
  seFour:
    DoSomething;
end;
Run Code Online (Sandbox Code Playgroud)

我正在尝试弄清楚如何使其格式如下:

case SomeEnum of
  seOne: begin

  end;
  seTwo: begin

  end;
  seThree: ;
  seFour: DoSomething;
end;
Run Code Online (Sandbox Code Playgroud)

但是,我找不到适当的选项来进行此更改。

如何制作如上所示的案例陈述格式?

Ser*_*yuz 5

您当前的设置需要进行两项修改。在“缩进”选项中将“缩进大小写内容”设置为 false,在“换行符”选项中将“控制语句中单个指令之前的换行符”设置为“否”。