V¡®u§ 849 Posted March 13, 2013 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; 1 Vitor Pinho ☮ reacted to this Share this post Link to post Share on other sites
Vitor Pinho ☮ 1,199 Posted March 13, 2013 Bom tópico, continua. http://cyber-gamers.org/public/style_emoticons/default/451960.gif Share this post Link to post Share on other sites