Убрать повторы из списка фамилий

vector<kursant>K;
Form3->ListBox1->Items->Clear();
    TStringList *l = new TStringList;
    string s = string(Edit3->Text.t_str());
    const char *c = s.c_str();
    int k = 1;
    for (int i = 0; i < K.size(); i++) {
        if (K[i].fam[0] == c[0]) {
            l->Add(String(K[i].fam.c_str()));
        }
    }
    for (int i = 0; i < l->Count - 1; i++) {
        for (int j = i + 1; j < l->Count; j++) {
            if (l->operator[](i) == l->operator[](j)) {
                l->Delete(j);
            }
        }
    }
 
    Form3->Show();
    for (int i = 0; i < l->Count; i++) {
        Form3->ListBox1->Items->Add(l->operator[](i));
    }

l->Sorted = true;
l->Duplicates = dupIgnore;
// l->CaseSensitive = true; // опционально

 povrediList->Sort(); // сортирую список адресов
    int c = 0;
    for (int i = 1; i < povrediList->Count; i++)// удаляю поторяющиеся адреса
    {
     if (povrediList->Strings[i] !=""
      &&
      povrediList->Strings [c]   != povrediList->Strings[i])
     {
      c=i;
     }else povrediList->Strings[i] = "";
    }
   povrediList->Sort(); // сортирую список адресов