AnsiString str;
   TStringList *s1,*s2,*s3;  //s1型號;s2數量;s3關聯
   s1 = new TStringList();
   s2 = new TStringList();
   s3 = new TStringList();       s1->Add("TP8204");  //加入資料
   s2->Add("5");
   s1->Add("TB2001");
   s2->Add("10");
   s1->Add("TA1001");
   s2->Add("9");       //s1尚未排序前先建立關聯
   for(int i=0;iCount;i＋＋)
   {
      str.sprintf("%s=%s",s1->Strings[i],s2->Strings[i]);
      s3->Add(str);
   }
   //s1進行排序
   s1->Sorted = true;
   //從關聯s3中取回數量資料
   for(int i=0;iCount;i＋＋)
   {
     s2->Strings[i] = s3->Values[s1->Strings[i]];
   }
   //你可透TListBox元件來承接s1及s2資料,看看排序前後產生何種變化       delete s1,s2,s3;