https://mstdn.nere9.help/@orange_in_space/112054602849649446
ていうか、Delphiで書くとエレガントになる事例だよねたぶん><
case 文 - 宣言と文(Delphi) - RAD Studio
https://docwiki.embarcadero.com/RADStudio/Alexandria/ja/%E5%AE%A3%E8%A8%80%E3%81%A8%E6%96%87%EF%BC%88Delphi%EF%BC%89#case_.E6.96.87