Listbox - uklanjanje duplikata

Listbox - uklanjanje duplikata

offline
  • chuten 
  • Novi MyCity građanin
  • Pridružio: 22 Okt 2006
  • Poruke: 7

Poz, mucim se vec izvesno vreme, pa bih zamolio nekog dobre volje da mi kaze kako mogu najlakse da izdvojim duplikate iz listbox-a.
npr

aca
aca
boki
boki
boki
pera
zika
zika

itd

da izdvoji samo

aca
boki
pera
zika

Hvala unapred Ziveli



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

  1. var
  2.   sortirana_lista: TStringList;
  3.  
  4. begin
  5.   sortirana_lista := TStringList.Create;
  6.   sortirana_lista.Sorted := true;
  7.   sortirana_lista.Duplicates := dupIgnore;
  8.  
  9.   sortirana_lista.AddStrings(ListBox1.Items);
  10.  
  11.   ListBox1.Items.Clean;
  12.   ListBox1.Items.AddStrings(sortirana_lista);
  13.  
  14.   sortirana_lista.Free;
  15. end;



Ko je trenutno na forumu
 

Ukupno su 993 korisnika na forumu :: 63 registrovanih, 5 sakrivenih i 925 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: Aleksa 3215, Azzo, bajonet, baltazar01, bobomicek, Bojan198527, bokisha253, Brana01, Bubimir, Dolinc, drimer, DrSidious, gagidjuric, glados, Glavni Oružni, Hemi, Hitri, HPkopun, ILGromovnik, IvicaiMarica, jnikola23, Koca Popovic, Kubovac, Logic005, LostInSpaceandTime, mango, mir, Mitraljeta, moldway, mrgud2025, Natuzzi, Nobunaga, nuki1234, ObelixSRB, opt1, pein, pobeda, PrincipL, punto, royst33, S-lash, S94, samo opusteno, samsung, sap, sekretar, Semprini, sluga, Tafocus, tajvankanasta, tesa, Trpe Grozni, tvlada, ujke, veljkovicdani, vidra boy, Vladko, vojnik švejk, x011, x9, ZlatniRez, Zorge, Zukov