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

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

Как считать информацию из *.ini файла ? [D5, D6, Win95/98, WinME]


Lizard ©   (2002-02-22 21:10:00) 

Есть .ini файл, который имеет след. строки:

[Main]
0=param0
1=param1
2=param2
3=param3

Как считать эти строки (точнее их значения) из файла File.ini
и поместить поочередно в listbox ?

Очень прошу, помогите. Я уверен, что для Вас это пара пустяков.
Спасибо.


Косильщик_Лужаёв   (2002-02-28 02:42:00) [1]

listbox1.Items.LoadFromFile("file.ini");


Shirson   (2002-02-27 09:08:00) [2]

Анатолий, ты букву w пропустил :)

А насчет неизвестности количества строк... А что мешает сделать так:


var TS:TString;
IniFile:TInifile;
A:integer;
Begin
...
ReadSection ("main",TS)
For A:=1 to TS.Count do
IniFile.writeString("Main",inttostr(A),XXXX);
...


Anatoly Podgoretsky   (2002-02-24 18:48:00) [3]

Если тебе неизвестно количество строк то никак, но если известно то

for I := 0 to N do IniFile.riteString("Main", IntToStr(I),XXXX);

Ты бы взглянулв в хелп для начала


Lizard   (2002-02-24 18:27:00) [4]

Спасибо!

А как добавить N-ное количество строк, когда нам оно неизвестно?
Например, если в файле всегда меняется кол-во строк, как выяснить
сколько их и потом загрузить в listbox?

[Main]
0=param0
1=param1
2=param2
3=param3
....
n=paramN



Anatoly Podgoretsky   (2002-02-23 10:07:00) [5]

TIniFile.ReadSection


Miwa   (2002-02-23 07:45:00) [6]


...
uses TIniFile;
...
var ini: TIniFile;
tmpstring:string;
begin
ini:=TIniFile.Create("yourfile");
tmpstring:=ini.ReadString("main","0","default value");
listbox1.items.add(tmpstring);
end;

Только учти, если ты yourfile пропишешь без бути (myfile.ini), програ будет искать его в папке %windir%\system.


Вадим   (2002-02-22 21:23:00) [7]

см. TIniFile


Наверх

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