将listbox1中每1行的值，写入到自定义文本文件中

将listbox1中每一行的值，写入到自定义文本文件中

写入到文件本件中后排列方式如下：
111 222 333 444 555 666
当一行中大于6个时自动换行


[解决办法]
for i := 0 to lst1.Items.Count - 1 do // lst1 改 listbox1