Текущий архив: 2007.01.07;
Скачать: CL | DM;
Вниз
Считывание строки из файла Найти похожие ветки
← →
StormZCOoler (2006-12-15 08:14) [0]Ситуация есть файл edit1.txt в нём записаны слова через символ "&" например:
привет&hello
пока&goodbye
сегодня&today
.....и т.д.
как сделать чтобы при запуске программы т.е. при активации формы, слова из файла edit1.txt выводились в ListBox1 только до символа "&" и так каждую строку.
Второе что надо:
в этой де форме есть "edit1" и "button1" как сделать так чтобы, при вводе слова например "привет" делался поиск по файлу и выводилось значение которое стоит за символом "&". Выводилось например в "label1".
← →
PZ (2006-12-15 08:22) [1]Можно совместно использовать:
TListString
функцию Pos
процедуру Copy
← →
OnixLab (2006-12-15 08:29) [2]var TS : TStringList;
while not F.Eof do begin
Read(F, s);
ListBox1.Items.Add( Copy(s, 1, Pos("&", s)-1) );
TS.Add( Copy(s, Pos("&", s)+1, Length(s) - Pos("&", s) );
end;
Думаю так будет быстрее работать. Ищешь в 1-м и выдаешь из второго.
← →
Arm79 © (2006-12-15 22:50) [3]Позволю и себе привести вариант :))
Схематично так сказать, только чтобы показать идею.
StringList.LoadFromFile("edit1.txt");
StringList.Text := ReplaceStr(StringList.Text, "&", "=", [ReplaceAll]);
For i := 0 to TStringList.Count-1
do begin
ListBox1.Items.Add(TStringList.Names[i]);
end;
← →
Arm79 © (2006-12-15 22:51) [4]Дополнение к ответу.
При выборе в ListBox строки соответствующее ей значение: StringList.Values[ListBox.НУЖНЫЙ ИТЕМ]
← →
Германн © (2006-12-16 01:48) [5]Ещё вариант.
Использовать в ListBox метод AddObject.
Страницы: 1 вся ветка
Текущий архив: 2007.01.07;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.008 c