Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

конфиги [D7, XP]


Страницы:   1 2

>>DEATH<< ©   (2006-12-15 13:21:00) 

как грузить конфиги типа
[группа1]
параметр1=...
параметр2=...
[группа2]
параметр1=...
параметр2=...


ajlekceu   (2006-12-17 18:19:00) [1]


> >>DEATH<<   (17.12.06 04:34) [26]
> разобрался с  этим..а есть функция чтобы записывать переменную
> в конфиг


...
ini.WriteString('qqq','www',Edit1.Text)


Плохиш   (2006-12-17 12:58:00) [2]


> >>DEATH<<   (16.12.06 15:41) [18]
> ini := tinifile.create( 'file.ini');


> >>DEATH<<   (16.12.06 15:45) [19]
> ini там где и сам проект..в этой же папке

Тогда почему ты в своей программе говоришь, что файл в папке с вындовс?


SerJaNT   (2006-12-17 12:07:00) [3]

> до сих пор никто не послал за метлой.


Почему же?


> >>DEATH<<  
За метлой!


Virgo_Style   (2006-12-17 10:28:00) [4]

Anatoly Podgoretsky ©   (17.12.06 9:38) [28]

Во всяком случае, я не имею ничего против такой трактовки.


Anatoly Podgoretsky   (2006-12-17 09:38:00) [5]

> Virgo_Style  (17.12.2006 8:52:27)  [27]

Стоит ли расценивать твое восхищение, как приглашение в поход за инструментом?


Virgo_Style   (2006-12-17 08:52:00) [6]

>>DEATH<<   (17.12.06 4:34) [26]

функции- нету.

P.S. Восхитительно. Еще более удивительно, впрочем, что до сих пор никто не послал за метлой.


&gt;&gt;DEATH&lt;&lt;   (2006-12-17 04:34:00) [7]

разобрался с  этим..а есть функция чтобы записывать переменную в конфиг


RASkov   (2006-12-16 19:36:00) [8]

> [19] >>DEATH<<   (16.12.06 15:45)


> ini := tinifile.create('file.ini');


> ini там где и сам проект..в этой же папке

Посмотри, нет ли у тебя файла file.ini в папке Winows. Скорее всего есть и он пустой.
Ини файлам нужно указывать полный путь к ним. Иначе они ищутся в системной папке. имхо.


Anatoly Podgoretsky   (2006-12-16 15:55:00) [9]

> SerJaNT  (16.12.2006 15:52:23)  [23]

Ошибки нет, все работает правильно.
Но он не умеет пользоваться поиском в Виндоус.


SerJaNT   (2006-12-16 15:52:00) [10]

Что за ошибка-то хоть?


antonn   (2006-12-16 15:51:00) [11]

>>DEATH<<   (16.12.06 15:41) [18]
ini := tinifile.create('file.ini');

tinifile.create(extractfilepath(application.exename)+'file.ini')


&gt;&gt;DEATH&lt;&lt;   (2006-12-16 15:50:00) [12]

не знаю где написать это


Anatoly Podgoretsky   (2006-12-16 15:47:00) [13]

> >>DEATH<<  (16.12.2006 15:45:19)  [19]

А функция про это знает?


&gt;&gt;DEATH&lt;&lt;   (2006-12-16 15:45:00) [14]

ini там где и сам проект..в этой же папке


Anatoly Podgoretsky   (2006-12-16 15:41:00) [15]

> >>DEATH<<  (16.12.2006 15:38:16)  [16]

> где ошибка :(

Давай по другому спросим, а где файл 'file.ini'?


&gt;&gt;DEATH&lt;&lt;   (2006-12-16 15:41:00) [16]

вот код программы
unit Unit1;
interface
uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, inifiles;
type
 TForm1 = class(TForm)
   Button1: TButton;
   Label1: TLabel;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;
var
 Form1: TForm1;
 ini: TIniFile;
val:string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ini := tinifile.create('file.ini');
val := ini.ReadString('qqq','www','');
ini.free;
label1.Caption:=val;
end;
end.


вот содержимое ini файла
[qqq]
www=1234567890


где ошибка :(


&gt;&gt;DEATH&lt;&lt;   (2006-12-16 15:38:00) [17]

вот код программы
unit Unit1;
interface
uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, inifiles;
type
 TForm1 = class(TForm)
   Button1: TButton;
   Label1: TLabel;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;
var
 Form1: TForm1;
 ini: TIniFile;
val:string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ini := tinifile.create('file.ini');
val := ini.ReadString('qqq','www','');
ini.free;
label1.Caption:=val;
end;
end.


вот содержимое ini файла
[qqq]
www=1234567890


где ошибка :(


SerJaNT   (2006-12-16 15:21:00) [18]

Синтаксис INI-файлов:

[ИмяСекции1]
Параметр1=Значение1
Параметр2=Значение2
...
ПараметрN=ЗначениеN

[ИмяСекции2]
Параметр1=Значение1
Параметр2=Значение2
...
ПараметрN=ЗначениеN

[ИмяСекции3]
Параметр1=Значение1
Параметр2=Значение2
...
ПараметрN=ЗначениеN

и т.д.

www.google.ru в помощь. Я вообще не понимаю в чем проблема


SerJaNT   (2006-12-16 15:02:00) [19]

";" ставить не надо!


&gt;&gt;DEATH&lt;&lt;   (2006-12-16 14:35:00) [20]

не [11] так не получается тоже


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо