如题
解决方案 »
- INNO让安装程序对话框置顶
- 读取TXT内容
- 我想在Dll中用主程序里的数据库模块,因为想用里面的程序,这要怎么才能用呀
- 如何计算精确的日期差值`呢????如:2006-01-19与2006-03-12差几天呢
- 有一个字符长度不定,不够六位,在前面补齐。如何实现?
- 请问哪里有比较详细实用的打印教程?
- 高分求教在题库中随机抽题的算法问题
- 如何在memo中输入特殊字符?象word里的特殊字符一样
- 怎样实现显示N个控件,窗口的功能不同,控件的个数不同。
- 新手提问:我的FILELIST和DIRLIST控件找不到,谁能告诉我。
- 怎么能让欢迎界面WelForm在2秒钟后,WelForm窗口长和宽逐渐缩小到不显示,需要有点动态的视觉效果,然后跳到主界面MainForm
- 救命.
删除文件就可以了使用TIniFile,在文件不存在的情况下都可以的
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
var
myini:Tinifile;
begin
myini.EraseSection(const section:string);
end;
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
AssignFile(F, '你的文件');
Rewrite(F);
CloseFile(F);
end;
iHandle : Cardinal ;
begin
iHandle := FileCreate('d:\result.txt');
FileClose(iHandle);
end;