范例(t):
写出到本地txt文件中
str:= 'Hello demo!!';
r:=rdo2 WriteFile(rwraw(),'',"d:\\test.txt",-1,length(str),str);
if r=1 then return "写出成功";
else return r;
读取本地txt文件内容
r:=rdo2 ReadFile(rwraw(),'','d:\\test.txt',0,10000,data);
if r=1 then return data;
else return r;//读取失败
文件读写类型函数