用ReadLn读文本文件,文件较大(960K)的竟然读不出!把文件名改为另一个较小的文本文件,其它代码不变,运行正常,这证明程序无误。我不 用ReadLn读文本文件,文件较大(960K)的竟然读不出!把文件名改为另一个较小的文本文件,其它代码不变,运行正常,这证明程序无误。我不明白的是,960K算大吗?为什么??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var MyFile:TextFile;begin AssignFile(MyFile,'c:\Text.txt'); Reset(MyFile);//只读打开文件 try {文件操作} Finally CloseFile(MyFile); End;end; 可能不是文件大小的问题而是行大小的问题readln(f,s)至多读255个字符试试p:array[0..1000] of char;readln(f,@P);或者用TstringList fastreport 4.0 TImage的画布问题 最丢脸的问题 怎样在点击DBGrid中的表头出现排序的那个小三角符号?? 请帮我看一下这个按钮事件的代码错在那了? 回答问题给分!!!!! 怎么样做网络监视的程序???急~~~~~~~~~~~,15分呀, 送分请教:Delphi 4下的TreeView中节点能显示中文,怎么设? 如何可以按ESC键来回到上一个控件,就象可以用回车代替TAB来跳到下一个控件上一样? delphi6好用吗?我还未用过,不知它是否可以兼容旧版本的控件? 来吧,来吧。快来吧。 在线等待!如何将电子表格(.xls)导入oracle数据库???
MyFile:TextFile;
begin
AssignFile(MyFile,'c:\Text.txt');
Reset(MyFile);//只读打开文件
try
{文件操作}
Finally
CloseFile(MyFile);
End;
end;
而是行大小的问题
readln(f,s)至多读255个字符
试试
p:array[0..1000] of char;
readln(f,@P);
或者用TstringList