Passar valores selecionados do listbox1 para o listbox2

Delphi

02/01/2014

Galera,bom dia

O ano mal começou e lá vem minhas dúvidas (afinal vou aproveitar as férias pra estudar!).

Como faço para passar valores selecionados do listbox1 para o listbox2? Entre estes coloquei um botão (setar > e <).

Abs.,
Thiago

Thiago

Curtidas 0

Respostas

Leandro Chiodini

Leandro Chiodini

02/01/2014

Fala thiago ,

seguinte primeiro tu faz uma chegagem para ver se tem itens selecionados.
E depois adiciona no listbox 2 os itens

if ListBox1.Selected[i] then
begin
ListBox2.Items.Add(ListBox1.Items[i]);

att
Leandro
GOSTEI 0
Thiago

Thiago

02/01/2014

Legal! Funcionou.

E no caso deu querer colocar de volta os valores no lisbox1? E só inverter o código abaixo?

Fala thiago ,

seguinte primeiro tu faz uma chegagem para ver se tem itens selecionados.
E depois adiciona no listbox 2 os itens

if ListBox1.Selected[i] then
begin
ListBox2.Items.Add(ListBox1.Items[i]);

att
Leandro
GOSTEI 0
Leandro Chiodini

Leandro Chiodini

02/01/2014

Isso mesmo Thiago.
o contrario é verdadeiro também
:D
GOSTEI 0
Thiago

Thiago

02/01/2014

Ok! E mais uma vez obrigado amigo!

Isso mesmo Thiago.
o contrario é verdadeiro também
:D
GOSTEI 0
POSTAR