Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

Как считать информацию из *.ini файла ?   Найти похожие ветки 

 
Lizard   (2002-02-22 21:10) [0]

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

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

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

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


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

см. TIniFile


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


...
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.


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

TIniFile.ReadSection


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

Спасибо!

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

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




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

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

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

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


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

Анатолий, ты букву 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);
...


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

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



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.005 c
3-88358
Ura
2002-04-29 14:50
2002.05.27
Сообщение


14-88611
kaif
2002-04-19 02:56
2002.05.27
Кто как решает вопросы GRANT ?


1-88462
IronWit
2002-05-17 17:20
2002.05.27
как менять программно ширину и высоту колонок в stringgrid


7-88643
Neo_Max
2002-03-01 14:55
2002.05.27
Запуск внешних программ


14-88634
hp1100
2002-04-18 15:36
2002.05.27
Подскажите плз линк на сервис





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский