![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Форумчанин
Регистрация: 25.04.2011
Сообщений: 107
|
![]()
И ещё важно!
"и опять много много много 67 копеек. а ещё хочу 2 рубля. может даже 854 рубля!" я так понял, если после меньшей строки идёт большая, он затирает всё что ниже. |
![]() |
![]() |
![]() |
#12 |
Форумчанин
Регистрация: 29.09.2011
Сообщений: 116
|
![]()
делайте проверку пустой строки и пропускайте ее.
Код:
|
![]() |
![]() |
![]() |
#13 |
Форумчанин
Регистрация: 25.04.2011
Сообщений: 107
|
![]()
Так же если есть разница в длине строк:
"и опять много много много 67 копеек. а ещё хочу 2 рубля. может даже 854 рубля!" он затирает вот в этом варианте нижнюю. |
![]() |
![]() |
![]() |
#14 |
Форумчанин
Регистрация: 29.09.2011
Сообщений: 116
|
![]()
взял ваш вариант и вот результат:
"и опять много много многошестьдесятсемь копеек. а ещё хочудва рубля. может даже восемьсот пятьдесятчетыре рубля!" |
![]() |
![]() |
![]() |
#15 |
Форумчанин
Регистрация: 25.04.2011
Сообщений: 107
|
![]()
Прошу прощения, а какой средой вы пользуетесь?
|
![]() |
![]() |
![]() |
#16 |
Форумчанин
Регистрация: 29.09.2011
Сообщений: 116
|
![]()
delphi 2010 консольное приложение
|
![]() |
![]() |
![]() |
#17 |
Форумчанин
Регистрация: 25.04.2011
Сообщений: 107
|
![]()
Файл должен находиться в папке с проектом, или где-то ещё?
|
![]() |
![]() |
![]() |
#18 |
Форумчанин
Регистрация: 29.09.2011
Сообщений: 116
|
![]()
подобавляйте в конце каждой строки как в сотнях пробел (например 'один ') в функции Zamena
и подправте insert(p,s,j-del); тогда выводится будет как надо |
![]() |
![]() |
![]() |
#19 |
Форумчанин
Регистрация: 29.09.2011
Сообщений: 116
|
![]()
конечно!
при связывании assign(F,'text.txt') если без указания пути то файл ищется там же где исполняемый файл |
![]() |
![]() |
![]() |
#20 |
Форумчанин
Регистрация: 25.04.2011
Сообщений: 107
|
![]()
Вы очень помогли мне! Очень вас благодарю!
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Подсчет видимых строк при фильтрации | getikalex | Microsoft Office Excel | 4 | 15.09.2011 00:29 |
Access Violation и I/O error 103 без видимых причин | whatever | Помощь студентам | 2 | 10.12.2010 08:50 |
Загрузка памяти увеличивается без видимых причин | Парсифаль | Операционные системы общие вопросы | 20 | 28.06.2009 01:00 |
Копирование видимых ячеек | mephist | Microsoft Office Excel | 4 | 18.05.2009 11:18 |