![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Самый простой вопрос про INI
SleD © (2002-06-03 10:53:00)Как создать INI-файл (имя - File.ini), а потом при клике на кнопку загрузить в Edit1 17-ую строчку?
PVOzerski (2002-06-03 11:10:00) [1]Организовать ini-файл примерно так:
[lines]
line1=....
....
line17=....
....
Остальное, IMHO, очевидно.
MAxiMum (2002-06-03 11:04:00) [2]{Я рекомендую "старый дедовский способ" - расмотреть файл как текстовый}
var I: Integer; FFile: TextFile; S: String;
begin
I := 1;
AssignFile(FFile, "File.ini");
Reset(FFile);
while (not EoF(FFile)) and (I <= 17) do
begin
readln(S);
Inc(I);
end;
if I = 17 then ShowMessage("17-ая строка: "" + S + """)
else ShowMessage("Кол-во строк меньше 17.");
CloseFile(FFile);
end;