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

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.043 c
15-1208875487
SpiderManey
2008-04-22 18:44
2008.06.08
распознование картинок


15-1208756362
Скорость закачки
2008-04-21 09:39
2008.06.08
Скорость закачки


2-1210854738
Tommy
2008-05-15 16:32
2008.06.08
MySQL и Delphi


2-1211026843
Ultimate
2008-05-17 16:20
2008.06.08
Загрузка определенной строки из файла


3-1199661770
porter
2008-01-07 02:22
2008.06.08
получить несколько столбцов для одного поля





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский