最簡單的方法就是利用FoxPro的Append Memo命令。
Create Cursor curFile (TxtFile M)
Insert Into curFile Values ('')
Append Memo TxtFile From File.txt
ThisForm.edtBase1.ControlSource = curFile.TxtFile
這樣調(diào)入的文本文件在編輯框中是可編輯的，如果允許改變其中的內(nèi)容，可以使用如下命令將改變以后的內(nèi)容寫回到原來的文件中。
Copy Memo TxtFile To File.txt
另外，在Visual FoxPro 6.0中提供了兩個新的函數(shù)FileToStr()和StrToFile(),這使得以上功能的實(shí)現(xiàn)變得更加容易了。
也可以使用低級文件函數(shù)來實(shí)現(xiàn)以上功能。
xnFile = FOPEN('File.txt')
xnString = FGETS(xnFile)
thisform.edtbase1.value=xnString
另外，還可以使用RTF文本控件來實(shí)現(xiàn)以上功能。將該控件放置到表單上，然后設(shè)定其文件名屬性就可以了。在以下的例子中，允許用戶自己指定一個文件名。
LOCAL lcFile
lcFile =GETFILE('txt')
THISFORM.oleRTFedit.FileName = lcFile