A_A_ECKE | Дата: Четверг, 02.01.2014, 18:12 | Сообщение # 1 |
ламер
Группа: Пользователи
Сообщений: 6
Статус: 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
Статус: Offline
| Тут глянь пример
перед тобой две таблетки - красная и синяя - какую ты выберешь?
|
|
| |