如何将一个INI文件的内容全部清空,以便重写? 如何将一个INI文件的内容全部清空,以便重写? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Window只能EraseSection要不Rewrite这个文件Linux中Clear var MyIniFile: TIniFile; sjkmc,constr,password,username:string; filename:string; begin filename:=extractfilepath(paramstr(0))+'数据库配置.ini'; if fileexist(filename) then deleltefile(filename); MyIniFile := TIniFile.Create(extractfilepath(paramstr(0))+'数据库配置.ini'); sjkmc:='lllll'; username:='dfdf'; password:='df'; //以上三个反正是你想写的串 MyIniFile.WriteString('数据库配置','数据库服务器名称',sjkmc); MyIniFile.WriteString('数据库配置','用户名',username); MyIniFile.WriteString('数据库配置','密码',password); end; myIniFile.Free; FileAssign();Rewrite(f);CloseFile(f); 向INI文件重新写入一次不就完了吗?var F: TextFile;begin AssignFile(F, 'NEWFILE.INI'); Rewrite(F); CloseFile(F);end; 如何获得网卡(多个网卡)各自的型号及对应的IP地址?MAC地址 用ADOQuery的SQL语句操作Access表,如何生成Bool、自动编号这两种类型的字段 枚举类型问题 如何在opendialog等控件改变当前路径后,将当前路径指向程序运行路径? 怎么在线程里面创建ClientSocket? 高分请教:如何在本地访问远方网址中的access数据库? 高难问题,分不够可再加...... 怎样调用约定为CDECL的DLL? 有谁想参加delphi认证考试吗? 何处有作工具栏图标用的小bmp下载? 我问先 如何查找动态创建的窗体 请问这个语句谢的对吗?
Linux中Clear
MyIniFile: TIniFile;
sjkmc,constr,password,username:string;
filename:string;
begin
filename:=extractfilepath(paramstr(0))+'数据库配置.ini';
if fileexist(filename) then deleltefile(filename);
MyIniFile := TIniFile.Create(extractfilepath(paramstr(0))+'数据库配置.ini');
sjkmc:='lllll';
username:='dfdf';
password:='df'; //以上三个反正是你想写的串
MyIniFile.WriteString('数据库配置','数据库服务器名称',sjkmc);
MyIniFile.WriteString('数据库配置','用户名',username);
MyIniFile.WriteString('数据库配置','密码',password);
end;
myIniFile.Free;
Rewrite(f);
CloseFile(f);
var F: TextFile;begin
AssignFile(F, 'NEWFILE.INI');
Rewrite(F);
CloseFile(F);
end;