TList不仅可以于字串,也可用于实数,而TStringList仅用于String用法也比较简单
---------------------------------------------------------------------------
procedure TForm1.Button6Click(Sender: TObject);
var
a:TStringList;
begin
a:=TStringList.Create;
a.Add('D');
a.Add('C');
a.Add('B');
a.Add('A');
ListBox1.Items.Assign(a);
a.Sort;
ListBox2.Items.Assign(a);
end;
-----------------------------------
DlubleCat