Быстрая сортировка

[lennon]

Описывал ли кто то этот алгоритм конкретно для массива строк?
Строки сортирую с помощью void qs(LList * list,bool firstsort,bool req,int pos);
Можно ли сделать по другому?

void Swap(LList * list,int i,int j)
{
	string str1 = list->Strings(i);
	string str2 = list->Strings(j);
	list->Rewrite(str2,i);
	list->Rewrite(str1,j);
}

int FindKey(LList * list,int i, int j,int word)
{
	int first = Ord(list->Strings(i)[word]);
	for (int n=i;n<=j;n++)
	{
		if (Ord(list->Strings(n)[word]) > first) return n;
		else if (Ord(list->Strings(n)[word]) < first) return i; 
	}
	return -1;
}

int FindPartrition(LList * list,int i,int j,int key,int word)
{
	do
	{
		Swap(list,i,j);
		while (Ord(list->Strings(i)[word]) < key) i++;
		while(Ord(list->Strings(j)[word]) >= key) j--;
	}while(i<j);

	return i;
}

void QuickSort(LList * list, int i,int j,int word)
{
	int id = FindKey(list,i,j,word);
	if (id != -1)
	{
		int key = list->Strings(id)[word];
		int k = FindPartrition(list,i,j,key,word);
		QuickSort(list,i,k-1,word);
		QuickSort(list,k,j,word);
	}
}

void qs(LList * list,bool firstsort,bool req,int pos)
{
	int count = 0;
	bool found = false;
	char ch = 0;
	QuickSort(list,0,list->Count-1,0);

	for (int i=0;i<list->Count;i++)
	{
		if (list->Strings(i)[pos-1] == list->Strings(i+1)[pos-1])
		{
			ch = list->Strings(i)[pos-1];
			count++;
		}
		else if (ch != 0)
		{
			int p = i-1;
			LList * temp = new LList;
			for (int j=i-1;j<i+count;j++) temp->Add(list->Strings(j));
			QuickSort(temp,0,temp->Count-1,pos);
			for (int j=0;j<temp->Count;j++) list->Rewrite(temp->Strings(j),p++);
			qs(list,false,true,++pos);
			count=0;
			ch = 0;
			pos = 1;
		}
		else if (req) break;
	}
}