 |
|
||||
Você está aqui: Delphi ::: VCL - Visual Component Library ::: TListBox |
Como excluir o item ou itens selecionados em uma TListBox do Delphi usando a função DeleteSelectedQuantidade de visualizações: 13304 vezes |
Em algumas ocasiões nós precisamos excluir o item ou os itens selecionados em uma TListBox. Isso pode ser feito com o auxílio do método DeleteSelected da classe TListBox. Veja um trecho de código no qual excluímos apenas o item selecionado:----------------------------------------------------------------------
Precisa de ajuda? Chama no WhatsApp +55 (62) 98553-6711 (Osmar)
Este código foi útil? Paga um cafezinho pra mim :-(
PIX: osmar@arquivodecodigos.com.br
----------------------------------------------------------------------
procedure TForm3.FormCreate(Sender: TObject);
begin
// vamos adicionar alguns itens na ListBox
ListBox1.Items.Add('Goiânia');
ListBox1.Items.Add('Curitiba');
ListBox1.Items.Add('Brasilia');
end;
procedure TForm3.Button1Click(Sender: TObject);
begin
// vamos excluir o item selecionado
ListBox1.DeleteSelected;
end;
É possível conseguir o mesmo resultado usando o método Delete() do objeto Items (do tipo TStrings). Veja: ---------------------------------------------------------------------- Precisa de ajuda? Chama no WhatsApp +55 (62) 98553-6711 (Osmar) Este código foi útil? Paga um cafezinho pra mim :-( PIX: osmar@arquivodecodigos.com.br ---------------------------------------------------------------------- procedure TForm3.Button1Click(Sender: TObject); begin // vamos excluir o item selecionado ListBox1.Items.Delete(ListBox1.ItemIndex); end; Note que o método Delete() do objeto Items exige o índice do elemento a ser removido. Com o método DeleteSelected da classe TListBox esta exigência não existe. Além disso, o método DeleteSelected permite excluir mais de um elemento selecionado, ou seja, ele excluir todos os elementos selecionados. Veja: ----------------------------------------------------------------------
Precisa de ajuda? Chama no WhatsApp +55 (62) 98553-6711 (Osmar)
Este código foi útil? Paga um cafezinho pra mim :-(
PIX: osmar@arquivodecodigos.com.br
----------------------------------------------------------------------
procedure TForm3.FormCreate(Sender: TObject);
begin
// vamos adicionar alguns itens na ListBox
ListBox1.Items.Add('Goiânia');
ListBox1.Items.Add('Curitiba');
ListBox1.Items.Add('Brasilia');
// para que este exemplo funcione corretamente, a ListBox
// deverá permitir seleção múltipla
ListBox1.MultiSelect := True;
end;
procedure TForm3.Button1Click(Sender: TObject);
begin
// vamos excluir todos os itens selecionados
ListBox1.DeleteSelected;
end;
Execute este código, selecione mais de um item e clique no botão para verificar o resultado. Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009. |
 Link para compartilhar na Internet ou com seus amigos: |
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
