Sub WriteGroupFBini(Byref group As String)
Функция записывает главный заголовок (группу), которой в последствии могут принадлежать различные ключи. Ключи, имеющие одинаковые названия, но находящиеся в разных группах - это разные ключи! Можно вместо названия группы указать "" ,тогда группа создаваться не будет, и все ключи будут записаны как бы в одну общую группу.
group - заголовок(группа) для записи
Windows , Linux
#Include "window9.bi"
If CreateFBini("prefar.ini") <> Cast(Any Ptr, -1) Then
Dim As String ss="hello"
Dim As Integer32 ii=76
WriteGroupFBini("Group1")
WriteGroupFBini("Group2")
WriteValueFBini("Group1","Key",ss)
WriteValueFBini("Group2","Key",ii)
CloseFBini()
EndIf
If OpenFBini("prefar.ini",1) <> Cast(Any Ptr, -1) Then
? ReadStringValueFBini("Group1","Key")
? ReadIntegerValueFBini("Group2","Key")
?
dim as STRING sz = "Hello world"
WriteValueFBini("Group1","Key",sz)
WriteValueFBini("Group2","Key",Cast(Integer32,90))
? ReadStringValueFBini("Group1","Key")
? ReadIntegerValueFBini("Group2","Key")
CloseFBini()
Sleep()
EndIf
hello
76
Hello world
90
Created with the Personal Edition of HelpNDoc: Free Web Help generator