13,824
社区成员
发帖
与我相关
我的任务
分享谁能给我一段 快速排序 算法的例程：要求：将 TList 中的各个元素进行排序!!不胜感激！！
谁能给我一段 快速排序 算法的例程：要求：将 TList 中的各个元素进行排序
...全文
请发表友善的回复…
发表回复
BCB 2003-08-23
- 打赏
- 举报
up
柯本 2003-08-23
- 打赏
- 举报
TList 本身就有sort方法一个例子
int __fastcall comp(void *s1,void *s2)
{
return strcmp((const char *)s1,(const char *)s2);
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TList *p = new TList();
p->Add("aaa");
p->Add("bbb");
p->Add("ccc");
p->Add("111");
p->Sort(comp);
for(int i=0;i<p->Count;i++)
Memo1->Lines->Add((char *)p->Items[i]);
delete p;
}
//---------------------------------------------------------------------------
int __fastcall comp(void *s1,void *s2)
{
return strcmp((const char *)s1,(const char *)s2);
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TList *p = new TList();
p->Add("aaa");
p->Add("bbb");
p->Add("ccc");
p->Add("111");
p->Sort(comp);
for(int i=0;i<p->Count;i++)
Memo1->Lines->Add((char *)p->Items[i]);
delete p;
}
//---------------------------------------------------------------------------
