怎样清空一个ini文件中的所有内容啊

ytwxw 2003-07-09 11:09:23
如题
...全文
925 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
fengyvn 2003-09-20
  • 打赏
  • 举报
回复
呵呵,大伙都聪明.
Ask100 2003-09-20
  • 打赏
  • 举报
回复
关注
巍巍贺兰山 2003-07-16
  • 打赏
  • 举报
回复
删除原来的,
建个新的
大大怪老张 2003-07-16
  • 打赏
  • 举报
回复
var
iHandle : Cardinal ;
begin
iHandle := FileCreate('d:\result.txt');
FileClose(iHandle);
end;
ghostmirror 2003-07-16
  • 打赏
  • 举报
回复
belllab(bell) (的方法最好
sixgj 2003-07-16
  • 打赏
  • 举报
回复
var F: TextFile;

begin
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
jacket008 2003-07-15
  • 打赏
  • 举报
回复
var F: TextFile;

begin
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
sixgj 2003-07-15
  • 打赏
  • 举报
回复
var F: TextFile;

begin
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
火龙岛主 2003-07-15
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
myini:Tinifile;
begin
myini.EraseSection(const section:string);
end;
M16 2003-07-15
  • 打赏
  • 举报
回复
var F: TextFile;

begin
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;

DWGZ 2003-07-10
  • 打赏
  • 举报
回复
var F: TextFile;

begin
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
沧-海-桑-田 2003-07-10
  • 打赏
  • 举报
回复
往文件里写空串就行了!
belllab 2003-07-09
  • 打赏
  • 举报
回复
删除后再建一个同名的不就可以了^_^呵呵
ly_liuyang 2003-07-09
  • 打赏
  • 举报
回复
DeleteFile
删除文件就可以了

使用TIniFile,在文件不存在的情况下都可以的

1,593

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧