Creo que no te has molestado ni siquiera en mirarte la ayuda del case del delphi. Pero seria, la variable seria numerica en este ejemplo
case variable of
1,2: showmessage ('He pulsado el 1 o el 2');
3: showmessage ('Aqui ando');
Else // en caso de que no valga ni 1,2,3 la variable.
showmessage ('La variable no vale ni 1 ni 2 ni 3');
end;
si quieres que la variable cumpla varias por ejemplo >5 y <4, el case no te valdra porque su sintaxis es, tendras q usar condicionales if, dentro del case:
case Ordinal expression of
Ordinal value {,Ordinal value...} : Statement;
{...}
else Statement;
end;
Saludos. Serhasae
|