Buscar

Melhorando suas expressões if ii

Código

{Como foi dito pelo Alexandre Santos, podemos melhorar nossos ifs, acelerando os processos. Aqui vai umas dicas...}

Ao invés de...

1-> If (A = 1) or (A=5) or (A=10) or (A=50) Then
2-> If (B > 0) Then
       If (F < 5) Then
3-> If (A = 1) or (A=2) or (A=4) or (A=5) Then
       OK := True
      else
       If (A = 3) Then
        OK := False;

Faça...

1-> If (A in [1,5,10,50]) Then
2-> If (B > 0) and (F < 5) Then
3-> Case A of
      1,2,4,5: OK := True;
      else
       OK := False;


{Quando compilamos o nosso projeto no Delphi, ele é transformado numa outra linguagem (ASSEMBLER).
Pois é... o que isso tem a ver???!!!
A cada IF que você utiliza, simplesmente é gerado em torno de 200 linhas!!! No exemplo 2, foi economizado! Pense nisso. O programa fica maior e mais "pesado" para execução.

Espero que isso ajude essa galera!   }
 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Object pascal
Adicionada dia: 05/08/04
Por: Julio Cesar R. De Oliveira
Visualizada: 2712 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009