var
stream:tstream;
r:treader;if assigned(stream) then
else
stream:=tfilestream.Create('e:\test1.txt',fmopenread); r:=treader.Create(stream,1024);
showmessage(r.ReadString);//出错
应该用什么方法解决
stream:tstream;
r:treader;if assigned(stream) then
else
stream:=tfilestream.Create('e:\test1.txt',fmopenread); r:=treader.Create(stream,1024);
showmessage(r.ReadString);//出错
应该用什么方法解决
解决方案 »
- 200分求DDOS代码~~~*****不是想搞破坏,只是想了解*****第二贴!~~~
- 有关两个数据表合并分组求各人得Money总和得SQL语句如何写?详情见下。
- 如何通过程序获取U盘或移动硬盘的盘符?求 delphi 代码.
- SQL查询总是"超时,已过期",有什么好办法?
- 为什么要注册一个窗体类 有什么作用?
- 路过的高手千万别走呀,请到此一游。。。。
- 简单问题!抢分的上!!!!!!
- delphi 用IWebbrowser2如何获取IE地址栏的网址?
- 你好:重新加载窗体的问题!
- 如何取得鼠标点击处的屏幕位置?
- Fast Report中如何打印自定义数组?
- Fast Report 2.51分栏打印Bug
*** Otherwise it raises an EReadError exception. // attetion here.Warning: Always use ReadString for reading component strings to streams. The similarly-named ReadStr method is for internal use only by certain CLX components.你读文件的话 不需要用Treader