Как сохранить и получить строку из INI-файла

Советы » INI файлы » Как сохранить и получить строку из INI-файла

Ниже показаны две функции, которые помещают и получают значение переменной (StringName) в ini-секции (IniSection) ini-файла (TheIniFile)}

function

IniGetStringValue( TheIniFile: string

; IniSection: string

; StringName: string

; DefaultString: string

): string

; var

TheIni: TIniFile; begin

TheIni := TIniFile.Create(Self); try

Result := TheIni.ReadString( IniSection, StringName, DefaultString); if

Result = '' then

Result := DefaultString; finally

TheIni.Free; end

; end

; function

IniSetStringValue( TheIniFile: string

; IniSection: string

; StringName: string

; StringValue: string

): Boolean; var

TheIni: TIniFile; begin

TheIni := TIniFile.Create(Self); try

try

TheIni.WriteString( IniSection, StringName, StringValue); Result := True

; except

Result := False

; end

; finally

TheIni.Free; end

; end

;

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

Категории

Статьи

Советы

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