uso de case

[juaarias]

estoy intentado agragar a un case que si el itemIndex esta entre a y d, decir por ejemplo categoria UNO,no me doy cuenta como hacerlo ayuda plis jej

Código Delphi [-]
case cmbNivel.itemindex of
   (a y d):lblNivel.caption:='Unoo';//obvio el y es simbolico muy pseudo jeje
   1:lblNivel.Caption:='medio';
   2:begin
       lblNivel.Caption:='bajo';
       lblAdvertencia:caption:='¡¡¡PRECAUCION!!!';
     end;
 end;