1、打开Delphi7集成开发环境，在默认工程的Form1窗体放一个Memo1控件和一个Button1按钮。
2、在Unit1.pas源代码文件的implementation区声明一个TStringList类型的变量，并在Form1的OnCreate事件方法，写如下代码：
procedure TForm1.FormCreate(Sender: TObject);
begin
sl:=TStringList.Create;
sl.Add('b');
sl.Add('a');
sl.Add('c');
Memo1.Lines:=sl;
end;
3、双击Button1按钮进入OnClick事件方法，写如下代码实现排序功能：
procedure TForm1.Button1Click(Sender: TObject);
begin
sl.Sort;
Memo1.Lines:=sl;
sl.Free;
end;
4、F9运行程序，Memo1控件内容为‘b a c’点击Button1后内容为‘a b c’成功实现排序
5、修改Form1的OnCreate事件方法，代码如下：
procedure TForm1.FormCreate(Sender: TObject);
begin
sl:=TStringList.Create;
sl.Add('a=111');
sl.Add('b=222');
sl.Add('c=333');
sl.Add('d=444');
Memo1.Lines:=sl;
end;
修改Button1的OnClick方法代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(sl.Names[1]);
ShowMessage(sl.Values['b']);
Memo1.Lines:=sl;
sl.Free;
end;
解释一下：
Names[n]是只读属性，只能通过位置读取key名称。
Values[key]可以通过key给value赋值
也就是说key一旦确定无法改变，只有value可以改变
6、F9运行程序，点击Button1，先弹出位置为1的键值对的key，再弹出key为‘b’对应的value值。
