![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как работать с ini файлами или как создать свои настроичные файлы [D7, Win95/98, WinXP]
WebSQLNeeder © (2005-12-06 14:03:00)Мне нужно создать фаил где бы хранились настройки для моей програмы, которые можно было менять просто выбрав другой фаил, а не перекомпилировать заново програму.
Как это делается? Можно где то почитать пример?
Вот нужно что бы было потипу такого:
[имя пользователя]
Логин
[пароль]
Парооль
[...]
...
Virgo_Style (2005-12-07 15:21:00) [1]WebSQLNeeder © (07.12.05 15:16) [16]
Странно, я бы в таком случае вообще exception выбрасывал, "ибо нефиг" (c) читать строки с помощью ReadInteger.
WebSQLNeeder (2005-12-07 15:16:00) [2]А что за ерунда, если я делаю:
logins:= inttostr(ReadInteger('Avtorize','logins',0));
То мне выдает в качестве логина 0. Ну это значение по умолчанию, которое при чтении инифайла. А в чем дело? Почему у меня не читается нужное значение из ини файла ??
У меня записано:
[Avtorize]
logins=User
Antonn (2005-12-06 20:07:00) [3]WebSQLNeeder © (06.12.05 20:05) [14]
inifiles
WebSQLNeeder (2005-12-06 20:05:00) [4]TIniFile - это в каком юните находится ??
msguns (2005-12-06 15:13:00) [5]Чтобы посмотреть как "устроен" ini-файл достаточно глянуть Win.ini например
WebSQLNeeder (2005-12-06 15:04:00) [6]А как сделать что б в таком формате ??
Плохиш (2005-12-06 15:03:00) [7]
> [Time]
> 300
> [ip]
> 127.0.0.1
Это формат не ini-файла
WebSQLNeeder (2005-12-06 14:45:00) [8]Я не вру, у меня действительно справки нет в Делфи, дестрибутив был уже без справки, а другого не было для инсталяции ...
Спасибо за помощь, сейчас буду пробовать ...
>>Может просто надо выключить аутентификацию?
Нет, это я просто ради примера, там еще и другие параметры есть, например
[Time]
300
[ip]
127.0.0.1
Sergey13 (2005-12-06 14:26:00) [9]2WebSQLNeeder © (06.12.05 14:03)
>Вот нужно что бы было потипу такого:
[имя пользователя]
Логин
[пароль]
Парооль[...]
Может просто надо выключить аутентификацию?
Digitman (2005-12-06 14:25:00) [10]
> У меня в Делфи справки нет
хорошо если не врешь ... а если не врешь, то. спрашивается, зачем не устанавливая изначально справку создавать себе трудности и потом их героически преодолевать ?
ну а если врешь. то гораздо проще и честнее было бы ляпнуть что-либо в роде "в буржуинских языках я нибельмес"
Anatoly Podgoretsky (2005-12-06 14:16:00) [11]WebSQLNeeder © (06.12.05 14:07) [2]
Надо сделать. Никто не будет тебе постоянно сюда копировать справку.
Antonn (2005-12-06 14:11:00) [12]
procedure TFormConfig.load;
var inifile : TIniFile;
begin
inifile := TIniFile.Create(direc+'config.dat');
try
with inifile do begin
MainMonitor.Top:= ReadInteger('Position','Top', trunc(screen.Height/2));
MainMonitor.Left:= ReadInteger('Position','Left',trunc(screen.Width/2));
end;
finally
inifile.Free;
end;
end;
procedure TFormConfig.save;
var inifile : TIniFile;
begin
inifile := TIniFile.Create(direc+'config.dat');
try
with inifile do begin
WriteInteger('Position', 'Top', MainMonitor.Top );
WriteInteger('Position', 'Left', MainMonitor.Left );
end;
finally
inifile.Free;
end;
end;
Плохиш (2005-12-06 14:11:00) [13]
> WebSQLNeeder © (06.12.05 14:07) [2]
> У меня в Делфи справки нет
Это уже твои проблемы.
WebSQLNeeder (2005-12-06 14:08:00) [14]Можете привести здесь пример использования? Хоть бы и с другого проекта, просто для наглядности ...
Antonn (2005-12-06 14:07:00) [15]глянь сюды: http://www.delphiworld.narod.ru/
WebSQLNeeder (2005-12-06 14:07:00) [16]У меня в Делфи справки нет :)
MU (2005-12-06 14:04:00) [17]F1+TIniFile, F1 + TRegistry