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