Скачать: CL | DM;

Самый простой вопрос про INI   Найти похожие ветки 

← →
SleD ©   (2002-06-03 10:53) [0]

Как создать INI-файл (имя - File.ini), а потом при клике на кнопку загрузить в Edit1 17-ую строчку?

---

← →
MAxiMum ©   (2002-06-03 11:04) [1]

{Я рекомендую "старый дедовский способ" - расмотреть файл как текстовый}

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;

---

← →
PVOzerski ©   (2002-06-03 11:10) [2]

Организовать ini-файл примерно так:
[lines]
line1=....
....
line17=....
....
Остальное, IMHO, очевидно.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c