Question

delphi 怎么新建文件

Answer 1

var
f:Text;
begin
assign(f, 'c:\tmp.txt');
rewrite(f);//新建或者重写原有的文件
close(f);
end;
就这样。

追问

是文件夹不是文件

追答

服了你了，这都能写错，
uses SysUtils
用这个函数：function ForceDirectories(Dir: string): Boolean;

追问

我写错吗?

追答

delphi 怎么新建文件 检举 | 离问题结束还有 8 天 3 小时 提问者：林殊荣 | 浏览次数：28次
这不是你写的？？？？

Answer 2

同意楼上的，有点笔误
myinifile.redainteger（'小节名','关键字','缺省值');//读取整数型数据。
应为
myinifile.readinteger（'小节名','关键字','缺省值');//读取整数型数据

创建一个文件的函数：
function FileCreate(const FileName: string): Integer;

Description
FileCreate creates a new file with the specified name. If the return value is positive, the function was successful and the value is the file handle of the new file. A return value of -1 indicates that an error occurred.

Answer 3

菜单
文件－－－－New ...... 或 Others

Answer 4

新建一个什么样的问题呢?

Answer 5

filecreate('路径加文件名')；//创建一个文件。

读写ini文件：
先在 uses 定义 Inifiles, 在 var 定义 myinifile：Tinifile；

实现部分写代码：
myinifile：=Tinifile.create('d:\1.ini');//打开D盘的 1.ini 文件。
myinifile.readstring('小节名','关键字','缺省值')；//读取字符型数据。
myinifile.redainteger（'小节名','关键字','缺省值');//读取整数型数据。
myinifile.readbool（'小节名','关键字','缺省值');//读取逻辑型数据。

写入INI文件：
myinifile.writestring('小节名','关键字',变量或字符串值)；//写入字符型数据。
myinifile.writeinteger（'小节名','关键字','变量或整型数值);//写入整数型数据。
myinifile.writebool（'小节名','关键字',变量或TRUE或FALSE);//写入逻辑型数

myinifile.Free；//释放INI文件