case x of
a:begin end;
b:begin end;
c:begin end;
其中x应该是你要用到的变量 下面就是分别x=a x=b x=c时的执行语句 如果语句只有一行 可以不打begin end; 直接a: 你的语句; 记得打分号
var
i: Integer;
begin
i:= 3;
case i of
1: // 当i=1时的语句
2: // 当i=2时的语句
else
// 当i<>1也<>2时的语句
end;
end;