怎么建立一个临时文件? 怎么建立一个临时文件? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以读写文本文件啊或INI文件。 var tmpPath:PChar; tmpName:PChar;begin GetMem(tmpPath,255); GetMem(tmpName,255); GetTempPath(255,tmpPath); GetTempFileName(tmpPath,'tmp',0,tmpName); Result:=string(tmpName); FreeMem(tmppath); FreeMem(tmpName); var F: TextFile;begin assignfile(F) reset(F); writeln('test'); closeFile(F);end;大致就是这样 奇怪,可以建立文件,但是文件写不进去哪出错了,帮忙看看varf:textfile;assignfile(f,'cc.bat');reset(f);writeln('ccc');closefile(f);end; 关于paintbox问题 winxkm(蹩脚的程序员)请进,我来给你压压惊 {讨论}indy tcp的即时通讯的问题 求EXCEL导入ORACLE数据库代码,3Q! 请问如何用IdIPWatch监控远程客户端是否在线? 求救 delphi 操作word相关 自定义打印时,打印预览时能显时foot内容,可是打印时就没有了,怎么办? 多线程读写文件的问题。 有那位大哥在省数据局做过 关于文件管理 dbo的连接问题
tmpPath:PChar;
tmpName:PChar;
begin
GetMem(tmpPath,255);
GetMem(tmpName,255);
GetTempPath(255,tmpPath);
GetTempFileName(tmpPath,'tmp',0,tmpName);
Result:=string(tmpName);
FreeMem(tmppath);
FreeMem(tmpName);
F: TextFile;
begin
assignfile(F)
reset(F);
writeln('test');
closeFile(F);
end;大致就是这样
哪出错了,帮忙看看
var
f:textfile;
assignfile(f,'cc.bat');
reset(f);
writeln('ccc');
closefile(f);
end;