[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]


  • Страница 1 из 1
  • 1
Модератор форума: Spidy  
Форум мира Blitz3D » Вопросы по программированию » Общие вопросы по программированию » Работа с INI-Файлами на Blitz3D (Помогите написать функцию)
Работа с INI-Файлами на Blitz3D
A_A_ECKEДата: Четверг, 02.01.2014, 18:12 | Сообщение # 1
ламер
Группа: Пользователи
Сообщений: 6
Награды: 0
Репутация: 0
Статус: Offline
Нарыл на просторах интернета (возможно даже здесь, тут я часто бываю) функцию чтения и INI-файла
Помогите найти или написать функцию записи.

или подскажите, как реализовать запись не просто в файл, а ещё и в определённую переменную. так, чтобы при повторной записи эта переменная не дублировалась, а перезаписывалась... (если это будет не INI-файл  -  то нужна к этой функции и функция чтения)

Function rINI(file$, group$, fiield$)
fil = ReadFile(file)
Local p$, ingroup, groupname$,f$,rest$
While Not Eof(fil)
.mix
p = ReadLine(fil)
If Left(p, 2) = "//" Or p = "" Then Goto mix
If Left(p, 1) = "["
ingroup = 1
groupname = Mid(p, 2, Len(p) - 2)
Else
If ingroup = 1
equal = Instr(p, "=")
f = Left(p, equal - 1)
rest = Mid(p, equal + 1)
Else Goto mix
EndIf
EndIf
If groupname = group And fiield = f Then Write rest ;  вывыд результата на экран
Wend
End Function
 
blitz3dДата: Четверг, 16.01.2014, 00:37 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 203
Награды: 3
Репутация: 7
Статус: Offline
Тут глянь пример

перед тобой две таблетки - красная и синяя - какую ты выберешь?
 
Форум мира Blitz3D » Вопросы по программированию » Общие вопросы по программированию » Работа с INI-Файлами на Blitz3D (Помогите написать функцию)
  • Страница 1 из 1
  • 1
Поиск: