 Как найти максимальное число в тексте? |
ВНИМАНИЕ!
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
| KljaGGsa |
 5.07.2009 18:57
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 16 Пол: Женский Репутация:  0   |
Если есть текстовый файл Т.txt , в тексте которого содержится несколько трехзначных чисел, как должна выглядеть процедура, с помощью которой можно было бы найти максимальное число и присвоить его целочисленной переменной i ?
|
   |
 
|
  |
Ответов
| youngDelphyGirl |
6.08.2009 13:47
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 6 Пол: Женский Репутация: 0 |
Цитата(volvo @ 6.08.2009 11:14)  Единственное, на что надо обратить внимание при чтении из этого файла в StringList: разбивается содержимое файла построчно и по тому символу, который задан в DelimiterChar, то есть, перед сохранением Memo->File надо все сочетания #13#10 заменить на какой-нибудь особый символ или последовательность (StringReplace подходит для этого как нельзя лучше), а потом, когда нужный фрагмент в StringList-е уже найден, заменить эту последовательность назад на #13#10. Как превратить эти светлые соображения в код, пока что представляю очень неясно . . .  Цитата(volvo @ 6.08.2009 11:14) P.S. Викторину какую-то пишешь что-ли? Может, выгоднее засунуть вопросы в БД (скажем, MSAccess)? Чем больше будет вопросов - тем выгоднее будет решение с Базой Данных. Мало ли, вдруг захочется еще и вопросы с изображениями включить...  Нет, о викторинах и публичной работе речи нет, это должна быть простая запоминалка для личного пользования Сообщение отредактировано: youngDelphyGirl - 6.08.2009 14:17 |
|
|
|
Сообщений в этой теме
KljaGGsa Как найти максимальное число в тексте? 5.07.2009 18:57
volvo Что кроме чисел есть в файле, и чем отделяются сло... 5.07.2009 18:59 KljaGGsa Вот образец содержимого файла:
001
фрагмент текс... 6.07.2009 6:06 volvo Общее количество строк в файле...
var sL: TStringL... 6.07.2009 12:46 KljaGGsa Вот на эту строчку:
if TryStrToInt(sL.Strings[i],... 6.07.2009 14:00 volvo Ну, так переменную Value типа Integer надо описать... 6.07.2009 14:32 KljaGGsa Владимир, а можно Вас попросить добавить комментар... 6.07.2009 14:51 volvo Комментарии добавлены... 6.07.2009 15:04 KljaGGsa Так хотелось бы с вашей помощью эти комментарии пр... 6.07.2009 15:13 volvo KljaGGsa, я имел в виду, что я в свой код, выше (в... 6.07.2009 15:31 KljaGGsa Есть целочисленная переменная r, значение которой ... 6.07.2009 15:49 volvo Смотри:
procedure TForm1.Button2Click(Sender: TObj... 6.07.2009 17:41 KljaGGsa Ну да, мы изначально условились, что r входит в ди... 6.07.2009 19:02 youngDelphyGirl
p := 5; // Будем искать в файле фрагмент № ... 5.08.2009 3:17
volvo А если мы даже приблизительно не знаем, сколько фр... 5.08.2009 8:15 youngDelphyGirl
А нам и не надо знать, сколько фрагментов в текст... 6.08.2009 9:39 volvo В принципе, не вижу проблем, чтоб хранить в файле ... 6.08.2009 11:14 volvo Очень просто...
На форме - Мемо, и две кнопки, од... 6.08.2009 15:06 youngDelphyGirl Спасибо, сейчас начну писать построчные комментари... 9.08.2009 8:25 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 14.07.2025 4:52 |