Social Icons

^^

quarta-feira, 13 de fevereiro de 2013

Estrutura Condicional: Case of no Delphi

  As estruturas de controle de fluxo são fundamentais para qualquer linguagem de programação. Sem elas só haveria uma maneira do programa ser executado: de cima para baixo, comando por comando. Não haveria condições, repetições ou saltos.
  A Linguagem Delphi possui diversas estruturas para controlar o fluxo de execução de comandos. É possível resolver os problemas sem utilizar todas elas, no entanto, devemos lembrar que a elegância e facilidade de entendimento de um programa dependem do uso correto das estruturas no local certo.
 Vamos analisar uma dessas estruturas:

Case-of 

O comando case é um substituto mais elegante e mais legível para if-then-else  múltiplos. A  expressão (ou seletor) deverá ser do tipo com o tamanho máximo de 2 bytes (Byte, Char, Word ou Integer).

Sintaxe:

case (expressão) of 
 constante 1 : bloco de comandos;
constante 2 : bloco de comandos;

else
 bloco de comandos
end;

Exemplos:

Abra seu Delphi e adicione 1 edit e 1 button:

No evento OnClick do button coloque:

var
x : integer;
begin
  x := strtoint(edit1.Text);
  case x of
  1: begin
     showmessage('A');
     end;

  2: begin
     ShowMessage('B');
     end;

  3: begin
     showmessage('C');
     end;
  else
  ShowMessage('O número não está dentro dos permitidos. ');
  end;







Nenhum comentário:

Postar um comentário

Popular Posts

 

Seguidores

Hora exata:

Total de visualizações de página