uso de case

[Casimiro Noteví]

Empezado por juaarias

gente queria saber si se pues realizar 2 asignaciones en un misma sentencia del case:
algo asi quisiera sabeer
case (cmbNivel) then
0:lblNivel.caption:=alto;
1:lblNivel.Caption:=medio;
2:lblNivel.Caption:=bajo (y tambien poder hacer aqui=)lblAdvertencia:caption:=¡¡¡PRECAUCION¡¡¡;

ESPERO SE ENTIENDA

Hola, se puede, sólo debes encerrarlo entre begin end

Código Delphi [-]
case cmbNivel.itemindex of
  0:lblNivel.caption:='alto';
  1:lblNivel.Caption:='medio';
  2:begin
      lblNivel.Caption:='bajo';
      lblAdvertencia:caption:='¡¡¡PRECAUCION!!!';
    end;
end;

¡¡¡Recuerda poner etiquetas al código!!!