Функция GetProfileInt

Declare Function GetProfileInt Lib "kernel32" Alias "GetProfileIntA" (ByVal lpAppName As String, _
    ByVal lpKeyName As String, _
    ByVal nDefault As Long) As Long

GetPrivateProfileInt читает целое значение из файла WIN.INI. Обратите внимание, что поддержка INI -файлов обеспечивается в Windows для совместимости; для хранения информации используйте системный реестр

Возвращаемое значение

В успешном случае функция возвращает значение ключа. Если заданное значение не существует, или является строкой, то возвращается значение, определенное как nDefault. Если полученное значение не является допустимым целым числом, то возвратится только числовая часть(Например, 38попугаев = 38)

Параметры

lpAppName
Секция, где идет поиск значения ключа(Регистр символов не учитывается)
lpKeyName
Ключ, значение которого требуется узнать(Регистр символов не учитывается)
nDefault
Значение по умолчанию, если заданный ключ не будет найден

Пример

' Читаем значение "layout" из ключа [SciCalc]
' файла WIN.INI
Dim retval As Long  ' получаемое значение из файла

' Читаем заданное значение,
' возвращая -1, если не сможем вернуть значение ключа
retval = GetProfileInt("SciCalc", "layout", -1)
If retval = -1 Then
  Debug.Print "Не могу прочитать требуемую информацию из WIN.INI"
Else
  Debug.Print "layout=:"; retval
End If

Смотри также

GetPrivateProfileInt, GetProfileString

Категория

Файлы INI