主题:  请问如何把.txt文件读入文本域field中?

vrfly

职务:普通成员
等级:1
金币:0.0
发贴:21
注册:2001/2/10 15:08:53
#12001/2/12 10:47:59
愚想把光盘中文件的说明文件(txt文件)动态的读入菜单中的某个field中,请问该用什么函数?



donlee

职务:普通成员
等级:1
金币:1.0
发贴:271
注册:2000/12/8 8:52:18
#22001/2/12 11:13:13
使用fileio xtra,eg:
on gettext
fobj=xtra("fileio").new()
myfile="c:\mytext.txt"
openFile(fobj,myfile,1)
ptext=readfile(fobj)
member(X).text=ptext
closeFile(fobj)
fobj=0
end



vrfly

职务:普通成员
等级:1
金币:0.0
发贴:21
注册:2001/2/10 15:08:53
#32001/2/12 13:47:28
我使用下列的函数读取3个说明文件
on getcdtext
set txt=0--设置文件实例
repeat with i=1 to 3--将文件输入到文件文本域中
txt=new(xtra"fileio")
openfile(txt,"E:\Program Files\Macromedia\Director 8\lizi\mpeg\00"&string(i)&".txt",1)
member("00"&string(i)).text=readfile(txt)
closefile(txt)
txt=0
end repeat
end
使用一个按扭来触发getcdtext函数。
我在director中play很正常,但create projector后,运行后,触发getcdtext后,跳出警告框“script error”。不知为何?请指教。



Kidmao

职务:普通成员
等级:1
金币:0.0
发贴:38
注册:2000/12/11 14:24:27
#42001/2/13 15:07:56
你忘记把fileio的xtra copy到project目录里面了



vrfly

职务:普通成员
等级:1
金币:0.0
发贴:21
注册:2001/2/10 15:08:53
#52001/2/13 19:40:23
非常感谢!