ReadShortValueFBini

ReadShortValueFBini

ReadShortValueFBini(Group,Key)

Функция получает значение типа Short из файла настроек.

Group -  Заголовок(группа)  (строковое имя)

Key - Ключ ( строковое имя)

Пример:

#Include "Window9.bi"

If CreateFBini("prefar.ini")<> -1 Then
  Dim As String ss="hello"
  Dim As Short ii=76
  WriteGroupFBini("Group1")
  WriteGroupFBini("Group2")
  WriteValueFBini("Group1","Key",ss)
  WriteValueFBini("Group2","Key",ii)
   CloseFBini()
EndIf

If OpenFBini("prefar.ini",1)<>-1 Then
  ? ReadStringValueFBini("Group1","Key")
  ? ReadShortValueFBini("Group2","Key")
  ?
  WriteValueFBini("Group1","Key","Hello world")
  WriteValueFBini("Group2","Key",Cast(Short,90))
  ? ReadStringValueFBini("Group1","Key")
  ? ReadShortValueFBini("Group2","Key")
   CloseFBini()
   Sleep()
EndIf

http://mneniya.ucoz.ru/

Created with the Personal Edition of HelpNDoc: Easily create EPub books