;-- 将数据写入文件中的指定行。
file=A.txt ;新建文件
_数据3=`r`n return
_数据2=`r`n {`r`n }
_数据1 = Lbutton`:`:`r`n
loop 1
{
FileWriteLine(file, _数据3, 1, 1) ;写入return
FileWriteLine(file, _数据2, 1, 1) ;写入花括号
FileWriteLine(file, _数据1, 1, 1) ;“_数据”里的内容 ,写入第一行,
}
FileWriteLine( _File, _Data = "", _Linenum = 1, _Replace = true ) {
FileRead, _FileData, % _File
_DataBefore := Substr( _FileData, 1, Instr( _FileData, "`r`n", false, 1, _Linenum - 1 ) )
_DataAfter := Substr( _FileData, Instr( _FileData, "`r`n", false, 1, ( _Replace ? _Linenum : _Linenum - 1 ) ) )
_FileData := _DataBefore . _Data . _DataAfter
FileDelete, % _File
FileAppend, % _FileData, % _File
}
暂无讨论,说说你的看法吧