怎么根据ListView 写ini文件

如何根据ListView 写ini文件
怎么根据ListView 保存成ini文件

例如 ID 名称
  1 我
  2 你

保存成

[1]
name=我
[2]
name=你



本人菜鸟 哪位大牛告诉下谢谢。。

[解决办法]

Delphi(Pascal) code

 
 unit Unit1; 
  
 interface 
  
 uses 
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
 Dialogs, ComCtrls,IniFiles, StdCtrls; 
  
 type 
 TForm1 = class(TForm) 
   ListView1: TListView; 
   Button1: TButton; 
   procedure Button1Click(Sender: TObject); 
 private 
   { Private declarations } 
 public 
   { Public declarations } 
 end; 
  
 var 
 Form1: TForm1; 
  
 implementation 
  
 {$R *.dfm} 
  
 procedure TForm1.Button1Click(Sender: TObject); 
 var 
 ini:TIniFile; 
 i:integer; 
 begin 
 ini := TIniFile.Create('c:\my.ini'); 
 for i:=0 to ListView1.Items.Count - 1 do 
 begin 
   ini.WriteString(IntToStr(i+1),'name',ListView1.Items[i].SubItems.Strings[0]); 
 end; 
 end; 
  
 end.