Помогите пожалуйста с текстовыми файлами на C++ Builder

[katyanever]

Вот такая задача:
Дан текстовый файл, состоящий из некоторого количества строк. Написать функцию для сортировки порядка строк в файле, по возрастанию их длины.

[Smitt&Wesson]

Вот так методом пузырька.

TStringList *List = new TStringList;
List->LoadFromFile("Ваш файл");
bool x = true;
while(x)
{
x = false;
for(int i=0; i < List->Count-1; i++)
  if(List->Strings[i].Length() > List->Strings[i+1].Length())
  {
    List->Exchange(i,i+1);
    x = true;
  }
}
List->SaveToFile("Ваш файл");
delete List;