siralama sorunu

[sr1111]

s.a
listbox = wordlist ta kelimeleri bu sekilde siralayabiliyorum. fakat harf sirasina gore olup çift olanlari siliyor .
benim istedigim harf siralama index yapmadan (siralamayi bozmadan) çift olanlari sildirip siralama yapmak. bunu nasil yaparim.


var
S:TStringList;
begin
S := TStringList.Create;
S.Sorted := true;
S.Duplicates := dupIgnore;
S.Assign(wordlist.Items);
wordlist.Items.Assign(S);
S.Free;

[mkysoft]

iç içe bir for döngüsü ile halletmeniz mümkün,.

[sr1111]

tesekkur ederim de bir örnek verseydiniz iyi olurdu. yapabilsem yazmazdim buraya.

[mkysoft]

İstediğiniz çok özel bir şey değil, kendi kendinize çözmenizin iyi olacağını düşünüyorum. En basit sıralama algoritmasını düşünün mesala? Nasıl sıralıyoruz? Dizinin bir elamanını kendinden sonra gelen elemanlarla tek tek karşılaştırıyoruz, eğer daha küçükse yer değiştiriyoruz. Siz bu kısımda yer değiştirmeyecek ve birini sileceksiniz.

[sr1111]

tesekkurler farkli bir yoldan cozdum. diger richedit sorunumu cozemedim.
richeditte istedigim fontla yazilmis kelimeyi nasil degisitirebilirim.
viewtopic.php?f=2&t=25511