comando case com String
04/04/2003
0
Bom dia,
Eu tenho uma variavel Modo do tipo String e eu tenho varias ações diferentes para usar com cada valor q esta variavel receber ex:
if Modo = ´Modo Fdw´ then (acoes);
if Modo = ´Modo gdww´dthen (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdwdw´ then (acoes);
if Modo = ´Modo dwF´ then (acoes);
como eu faço para usar o case neste caso.
Eu tenho uma variavel Modo do tipo String e eu tenho varias ações diferentes para usar com cada valor q esta variavel receber ex:
if Modo = ´Modo Fdw´ then (acoes);
if Modo = ´Modo gdww´dthen (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdwdw´ then (acoes);
if Modo = ´Modo dwF´ then (acoes);
como eu faço para usar o case neste caso.
Anonymous
Curtir tópico
+ 0
Responder
Post mais votado
04/04/2003
Bom dia,
Eu tenho uma variavel Modo do tipo String e eu tenho varias ações diferentes para usar com cada valor q esta variavel receber ex:
if Modo = ´Modo Fdw´ then (acoes);
if Modo = ´Modo gdww´dthen (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdww´ then (acoes);
if Modo = ´Modo Fdwdw´ then (acoes);
if Modo = ´Modo dwF´ then (acoes);
como eu faço para usar o case neste caso.
Michael,
A declaração CASE não suporta tipos strings, variáveis ou funções, apenas tipos ordinais, que podem ser: numéricos, char, enumerados, lógicos ou typecasting como Integer(´A´).
No seu caso, acho que serie apropriado um tipo enumerado.
Veja um exemplo do help:
case MyColor of
Red: X := 1;
Green: X := 2;
Blue: X := 3;
Yellow, Orange, Black: X := 0;
end;
Aroldo Zanela
Responder
Mais Posts
04/04/2003
Adilsond
O case apenas aceita valores numéricos. O que voce pode fazer é criar um TStringList, jogar os valores para o mesmo e:
case MeuStringList.IndexOf(Modo) of
0:;
1:;
2:;
end;
case MeuStringList.IndexOf(Modo) of
0:;
1:;
2:;
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)