我想每次往指定文本文件写入时,都将内容写在文本文件的第一行,而不是以追加的方式写入。
var sl: tstringlist;
...
sl.loadfromfile(test.txt);
sl.insert(0,input type);
sl.savetofile(test.txt);
var sl: tstringlist;
...
sl.loadfromfile(test.txt);
sl.text:=you String+#13+sl.text;
sl.savetofile(test.txt);