populando um combobox com dados do DB

16/08/2008

0

Primeiramentre quero dizer que essa é uma dica, que não é de minha autoria, mas acho que ajudará ha muitas pessoas.
vamos lá:

Primeiro conecte ao banco de dados, depois selecione a tabela que for usar.

Depois clique em ComboBox e vá até eventos, escolha a opção OnBeforeShow, adicione o seguinte código.

function ComboBox1BeforeShow($sender, $params)
{
$items=array();

$This->Query1->Open();

$This->Query1->First();

while (!$This->Query1->EOF)
{
$items[str_pad($This->Query1->ID, 3, ´0´, STR_PAD_LEFT).´ - ´.$This->Query1->NOME]=str_pad($This->Query1->ID, 3, ´0´, STR_PAD_LEFT).´ - ´.$This->Query1->NOME;

$This->Query1->Next();
}

$This->Query1->Close();

$this->combobox1->Items=$items;
}

Neste exemplo estou concatenando 2 campos, ID e NOME, também estou usando a função ´str_pad´ para criar uma mascara para o ID com preenchimento de 3 zeros a esquerda.
O exemplo acima ira aparecer em seu combobox da seguinte maneira
001 - RICARDO BARROS MENDES
Se você precisar pegar a o item selecionado, você terá que usar o seguinte:

$this->ComboBox1->getItemIndex()

E se precisar pegar somente o ID do combobox utilize a função “substr”, que copia uma parte de uma string.
substr($this->ComboBox1->getItemIndex(),0,3);


Winigma

Winigma

Responder

Posts

22/08/2008

Winigma

introdução ao delphi for php

http://w17.easy-share.com/1701102182.html

aplicações Mysql com delphi for php aula I a VII:
http://w14.easy-share.com/1701102247.html

http://w14.easy-share.com/1701102294.html

http://w14.easy-share.com/1701102318.html

http://w14.easy-share.com/1701102315.html

http://w17.easy-share.com/1701102391.html

http://w17.easy-share.com/1701308549.html

http://w14.easy-share.com/1701308577.html

criando e-comerce com delphi for php I a VII
http://w14.easy-share.com/1701308762.html
http://w14.easy-share.com/1701308820.html
http://w17.easy-share.com/1701308856.html
http://w14.easy-share.com/1701308889.html
http://w17.easy-share.com/1701308937.html
http://w14.easy-share.com/1701308962.html
http://w14.easy-share.com/1701309006.html


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar