如何在 VFP中删除文本文件的空行

你可以试试用FSEEK(),FREAD(),FWRITE(),FSIZE,FOPEN(),FCLOSE,FCREATE(),FGETS()等函数对文本文件进行操作,方法很多:
1.整个取出存在EDIT1控件中,再去空行,再存回去.
AA=fopen(CFILENAME,0)
***AA是打开的文件具杆
cc=fseek(aa,0,2)
***CC是文件尾的字节数
DD=FSEEK(AA,0,0)
***DD是回到文件头
THISFORM.EDIT2.VALUE=FREAD(AA,CC)
***THISFORM.EDIT2.VALUE是把文件全存去EDIT2中去了

***去空行程序自己编吧

2.一行一行,空行不要,存在EDIT1控件中,再存回去
略

给你提供两种方法，你根据情况自己挑吧：
一：
= STRTOFILE("Your Input String" + CHR(13) + CHR(10),"PIPEI.TXT", .T.)

二：
cYourStr = FILETOSTR("PIPEI.TXT")
cYourStr = STRTRAN(cYourStr, CHR(13) + CHR(10) + CHR(13) + CHR(10), CHR(13) + CHR(10))
= STRTOFILE(cYourStr, "PIPEI.TXT")