items ListView

Delphi

15/04/2010

Boa tarde

Tenho um listview com checkbox, como faço para pegar somente os dados dos itens selecionados e mandar para um memo.




Grato
Frost

Frost

Curtidas 0

Respostas

Wesley Batista

Wesley Batista

15/04/2010

Olá amigo,

 Veja se este código irá lhe atender. 



procedure TForm1.BitBtn1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to ListView1.Items.Count - 1 do
  begin
     if ListView1.Items[i].Checked then
        Memo1.Lines.Add(ListView1.Items[i].Caption)
  end;

end;


Espero te ajudado

Um abraço

Wesley Batista
e-mail : wesley@tdstecnologia.com.br
site : www.tdstecnologiarj.com.br


GOSTEI 0
Wesley Batista

Wesley Batista

15/04/2010

Olá amigo, veja se esta implementação irá funcionar.



procedure TForm1.BitBtn1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to ListView1.Items.Count - 1 do
  begin
     if ListView1.Items[i].Checked then
        Memo1.Lines.Add(ListView1.Items[i].Caption)
  end;

end;




Espero te ajudado

Um abraço

Wesley Batista
e-mail : wesley@tdstecnologia.com.br
site : www.tdstecnologiarj.com.br

GOSTEI 0
Frost

Frost

15/04/2010

Bom Dia
WESLEY

Me ajudou sim bem isso mesmo que eu precisava

Obrigado
Vlw
GOSTEI 0
POSTAR