Как создать Ini-файл в директории программы

Советы » INI файлы » Как создать Ini-файл в директории программы

По умолчанию ini-файл создается в Windows-директории (например: TIniFile.Create('MFile.ini' )), что приводит к "захламлению" оной. Более (эко-)логично (за исключением случаев, когда программа делается для CD-ROM) если ini-файл создается в той же директории что и главная программа. Вот пример чтения и записи ini файла из директории программы:

function

ReadIni(ASection, AString : String

) : String

; var

sIniFile: TIniFile; sPath: String

[60]; begin

GetDir(0,sPath); sIniFile := TIniFile.Create(sPath + 'Name.INI'); Result := sIniFile.ReadString(ASection, AString, S); sIniFile.Free; end

; procedure

WriteIni(ASection, AString, AValue : String

); var

sIniFile: TIniFile; sPath: String

[60]; begin

GetDir(0,sPath); sIniFile := TIniFile.Create(sPath + 'Name.INI'); sIniFile.WriteString(ASection, AString, AValue); sIniFile.Free; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2022 - All Rights Reserved - www.delphirus.com