Создание массива из файла

 
0
 
Delphi, Kylix and Pascal
ava
Serious2008 | 23.01.2013, 00:34
Здравствуйте у меня есть файл вот такого стиля

help:Это помощь
info:Это информация

Подскажите пожалуйста какой-нибудь код, который будет брать информацию из этого файла и делать массив типа

[help] => Это помощь
[info] => Это информация

И это на Дельфях всё надо. 
Ответы (7)
ava
Данкинг | 23.01.2013, 00:10 #
Что конкретно не получается: открыть файл? Распарсить строку?
ava
northener | 23.01.2013, 00:11 #
Цитата (Serious2008 @  22.1.2013,  23:34 findReferencedText)
Здравствуйте у меня есть файл вот такого стиля

Не понятен "стиль" файла, ибо непонятно как термин "стиль" вы понимаете.

Цитата (Serious2008 @  22.1.2013,  23:34 findReferencedText)
Подскажите пожалуйста какой-нибудь код, который будет брать информацию из этого файла и делать массив типа

1:[help] => Это помощь

2:[info] => Это информация


А тут не понятно что вы имеете в виду под "массивовами типа".
ava
Serious2008 | 23.01.2013, 00:40 #
Цитата (northener @  23.1.2013,  00:11 findReferencedText)
Не понятен "стиль" файла, ибо непонятно как термин "стиль" вы понимаете.


Это означает что в файле много строк, и в каждой строке задано таким образом
ключ для будущего массива:{Это просто разделитель}Значение для этого ключа.

Цитата (northener @  23.1.2013,  00:11 findReferencedText)
А тут не понятно что вы имеете в виду под "массивовами типа".


Чтобы я мог по ключу массива например help получать строку, Это справка.
т.е. типа
writeln(a['help']);
выдавало на экран "Это справка".

Я уже delphi и pascal года 2-3 не открывал, мозг забыл стандартные команды, а мне нужно эту маленькую функцию реализовать, вот и полез на форум с просьбой
ava
northener | 23.01.2013, 01:08 #
Класс TStringList вам не поможет?
У этого класса есть свойства  Names  и Values.

Цитата (Serious2008 @  23.1.2013,  00:40 findReferencedText)
Я уже delphi и pascal года 2-3 не открывал, мозг забыл стандартные команды,

Это "отмазка". Пока забудем её.
ava
Keeper89 | 23.01.2013, 02:06 #
Самый легкий способ следующий:
1) Загружаем файл черед TStringList.LoadFromFile
2) Ставим TStringList.DelimitedText = ':'
3) Вызываем TStringList.Values['help']
ava
bems | 23.01.2013, 06:08 #
Keeper89, только не DelimitedText = ':' а NameValueSeparator := ':'
ava
Serious2008 | 30.01.2013, 02:23 #
Цитата (Keeper89 @ 23.1.2013,  02:06)
Самый легкий способ следующий:

1) Загружаем файл черед TStringList.LoadFromFile

2) Ставим TStringList.DelimitedText = ':'

2) Ставим TStringList.NameValueSeparator = ':' // (Спасибо Bems, поправил ;))

3) Вызываем TStringList.Values['help']

Спасибо вот это как то что надо. Отлично курсач почти готов.
Зарегистрируйтесь или войдите, чтобы написать.
Фирма дня
Вы также можете добавить свою фирму в каталог IT-фирм, и публиковать статьи, новости, вакансии и другую информацию от имени фирмы.
Подробнее
Участники
advanced
Отправить