Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.06.08;
Скачать: CL | DM;

Вниз

Загрузка определенной строки из файла   Найти похожие ветки 

 
Ultimate ©   (2008-05-17 16:20) [0]

У меня есть программа.
Мне необходимо сделать так, чтобы из имеющегося файла path.ini читалась строка, номер которой мне нужен... Нужна функция.
например:
function LoadPathFromFile(ns:integer):string;
где ns - номер строки.
Помогите пожалуйста!!!


 
Германн ©   (2008-05-17 16:24) [1]


> Ultimate ©   (17.05.08 16:20)

Читать файл построчно пока не будет прочитана нужная. Или считать весь файл в TStringList и в нем уже найти строку с заданным номером.


 
TStas ©   (2008-05-17 16:28) [2]

ЕСть два способа: первый - загрузить в TStringList весь этот самый path.ini, выбрать оттуда нужную строку, только у нее номер будет на 1 меньше, а потом убить безжалостно сам список; а второй - читать из файла строки в какую-то переменную, а как до нужной дойдёте, закончить чтение.

function LoadPathFromFile(ns:integer):string;
var
  List: TStringList;
begin
List := TStringList.Create;
List.LoadFromFile(path.ini); //Только лучше здесь толный путь к файлу написать, а то косяки могут быть
Dec(ns); //Т. к. в списке нумерация с нуля идёт
Result := List[ns];
List.Free; //Убили безжалостно ненужный список
end;

Токмо эту ф-цию надо в защищённом блоке вызывать, т. к. масса поводов для ошибок: нету файла, номер строки не тот и т. д.


 
Сергей М. ©   (2008-05-17 16:28) [3]

Носи не стаптывай:

function LoadPathFromFile(ns:integer):string;
var
 MyIniFile: TStrings;
begin
 MyIniFile := TStrings.Create;
 try
   MyIniFile.LoadFromFile("path.ini ");
   Result := MyIniFile[ns];
 finally
   MyIniFile.Free;
 end;
end;



 
TStas ©   (2008-05-17 16:29) [4]

Блин! Сразу трое ответили:)


 
Сергей М. ©   (2008-05-17 16:29) [5]

MyIniFile := TStringList.Create;


 
TStas ©   (2008-05-17 16:39) [6]

Удалено модератором


 
Ultimate ©   (2008-05-17 17:00) [7]

Спасибо! Теперь тока остается мелочи подправить...



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

Текущий архив: 2008.06.08;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.025 c
2-1211102144
Alx
2008-05-18 13:15
2008.06.08
Проблема с целостностью данных


15-1208864165
vajo
2008-04-22 15:36
2008.06.08
Какие существуют офисные программы для Symbian 9.2?


8-1181893421
BlackCat
2007-06-15 11:43
2008.06.08
Проигрывание AVI файла с выводом на плату ввода /вывода


15-1208872237
No_Dead
2008-04-22 17:50
2008.06.08
Дипломный проект и авторские права


15-1209297079
Kostafey
2008-04-27 15:51
2008.06.08
С днем рождения ! 27 апреля