Fórum Remover Itens Duplicados #226657
17/04/2004
0
Estou usando um listbox com diversos links, e um contador de links em um statusbar, o problema está que eu não estou conseguindo remover corretamente os itens que estão duplicados nesta lista, estou erando no loop o tempo todo... me parece simples mas estou errando feio!!!
Eu gostaria que alguem me mostra-se o codigo para a remoção destes itens duplicados no listbox!!!
Obrigado.
Eu gostaria que alguem me mostra-se o codigo para a remoção destes itens duplicados no listbox!!!
Obrigado.
Dan
Curtir tópico
+ 0
Responder
Posts
17/04/2004
Aroldo Zanela
Colega,
Eu não consegui entender o que você está precisando. Pode postar um fragmento do código pra gente avaliar melhor.
Eu não consegui entender o que você está precisando. Pode postar um fragmento do código pra gente avaliar melhor.
Responder
Gostei + 0
17/04/2004
Dan
Eu gostaria simplesmente de remover os itens duplicados de meu listbox!!!
Pois o loop que fiz só causa erros...
Pois o loop que fiz só causa erros...
Responder
Gostei + 0
17/04/2004
Aroldo Zanela
Colega,
Existem muitas alternativas. Esta é uma delas:
Existem muitas alternativas. Esta é uma delas:
var nI, nX, nP: Integer;
Lista: TStringList;
begin
Lista := TStringList.Create;
Lista.Sort;
ListBox1.Sorted:= true;
nX := ListBox1.Items.Count - 1;
For nI := 0 to nX do
if not (Lista.Find(ListBox1.Items[nI], nP)) then
Lista.Add(ListBox1.Items[nI]);
ListBox1.Items.Assign(Lista);
Lista.Free;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)