请各位大侠帮忙完成多项功能 关于操作txt文本
问题1：去除list1中的偶数行
问题2：点击list1中的项目，显示其+1行（偶数行）显示在textbox1中
问题3：删除选中的list1中的行，删除文本中的行和其+1行
问题4：修改textbox1中的内容，点击保存后，能将记录修改到文本中
假设文本为123.txt 奇数行为账号 偶数行为密码 list textbox
[解决办法]
如果是这样，不如改成 Name=Value 这种形式：
abc=123
def=456
这样既清晰易读，还很容易单取 Name 或单取 Value。假如 I := List1.ItemIndex 不小于0，这时 I 为选中行的索引值，则：
List1.Items.Names[I] 为选中行的账户名
List1.Items.ValueFromIndex[I] 为选中行的口令
