While: Delphi For Php

Olá galera, nesta Quick Tips, irei mostra como usar a estrutura de repetição While, no Delphi For PHP.

Vamos analisar primeiramente a estrutura do While:

Como podemos ver o While não temos a garantia de que a repetição seja executada, ela depende um valor, veja, por exemplo, abaixo o conteúdo do loop não será executado pois a variável “i” não possui nenhum valor,  se o seu conteúdo não for menor que 100, ele não irá executar o loop.

function BtnParClick($sender, $params)

{

 while ($i <= 100)

{

if ($i % 2 == 0)

$this->CbxPar->AddItem($i,Null, Null);

} 

}

Da maneira que esta, entraremos em loop infinito, por quê?

Justamente por não termos o incremento da variável controladora “i”m veja como seria o correto

function BtnParClick($sender, $params)

{

$i = 1;

while ($i <= 100)

{

if ($i % 2 == 0)

$this->CbxPar->AddItem($i,Null, Null);

$i++;

}

}

Vamos inicialmente construir um exemplo, e salvar nossa página com o nome uFrmOperadorWhile.php , e nela vamos adicionar :

4 Button (BtnImpar, BtnPar, Btn0Ate100,Btn100ate0)

4 Combobox (CbxImpar,CbxPar,Cbx100Ate0,Cbx0Ate100)

4 Label (LblPar,LblImpar, Lbl0Ate100, Lbl100Ate0)

Agora vamos as implementações de cada Button:

/*Vamos implementar neste Btn100Ate0 no seu evento onClick, como podemos nota na hora de adicionar o item estamos decrementando o valor de ir,ou seja vai de 100 até 0

*/

function Btn100ate0Click($sender, $params)

{

$i = 100;

while ($i >= 1)

{

$this->Cbx100Ate0->AddItem($i--,null, null);

}

}

/*Vamos implementar neste Btn100Ate0 no seu evento onClick, como podemos nota na hora de adicionar o item estamos incrementando o valor de ir,ou seja vai de 0 até 100

*/

function Btn0Ate100Click($sender, $params)

{

$i = 1;

while ($i <= 100)

{

$this->Cbx0Ate100->AddItem($i++,null, null);

}

}

/*Vamos implementar neste BtnImpar no seu evento onClick, o Loop em conjunto comum if para pegarmos apenas os números impares de 100 até 0, e ao final estamos incrementando o valor de i para não cairmos em um loop infinito

*/

function BtnImparClick($sender, $params)

{

$i = 1;

while ($i <= 100)

{

if ($i % 2 != 0)

$this->CbxImpar->AddItem($i,Null, Null);

$i++;

}

}

/*Vamos implementar neste BtnPar no seu evento onClick, o Loop em conjunto comum if para pegarmos apenas os números pares de 100 até 0, e ao final estamos decrementando o valor de i para não cairmos em um loop infinito

*/

function BtnParClick($sender, $params)

{

$i = 1;

while ($i <= 100)

{

if ($i % 2 == 0)

$this->CbxPar->AddItem($i,Null, Null);

$i++;

}

}

Vejamos o resultado final do exemplo.

Fico por aqui ate à próxima Quick Tips.

Um abraço

Wesley Y

wyamazack@rwsolution.com.br