stringlist的问题，谢谢帮忙！ (100分)

下面这段文本内容。insert都是0。怎样写个程序让这些0变成顺序的数字，就是从0到几。（行数未知，有多少行算多少行）。
str.Insert(0, '');service portmap start;
str.Insert(0, '');chkconfig portmap on;
str.Insert(0, '');vi /etc/fstab;
str.Insert(0, '');
str.Insert(0, '');add a line:
str.Insert(0, '');server1:/var/ftp/pub /mnt/server1 nfs defaults 0 0
str.Insert(0, '');
str.Insert(0, '');mkdir /mnt/server1

有没有首先
str:=tstringlist.Create;