16,749
社区成员
发帖
与我相关
我的任务
分享
const
VersionFileName = 'Version.ini'; //这是ini文件的文件名
//这是定义存储ini文件信息
type
TVersion = record
Version: string;
end;
//这是写入方法
function WriteVersionFile(const APath: string; AVersion: string): TVersion;
begin
with TIniFile.Create(APath + VersionFileName) do
try
MessageBox(0, PChar(AVersion), '提示', MB_OK + MB_ICONQUESTION);
WriteString('VERSION','VersionID', AVersion);
finally
Free;
end;
end;
{我的ini文件里面的内容样本
[VERSION]
VersionID=1.0.0.1
}