Question

请教delphi中有关case语句的用法

Answer 1

case <有序类型变量> of
值a: 语句块a
值b: 语句块b
值c .. 值d: 语句块c
......
otherwise: 语句块z
end;

追答

case of
值a: 语句块a
值b: 语句块b
值c .. 值d: 语句块c
......
else: 语句块z
end;