|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.06.2015, 12:03 | #1 |
Форумчанин
Регистрация: 22.11.2014
Сообщений: 109
|
Копирование и удаление текста в Memo - Delphi
Есть Memo1 мне нужно, по условию если в первом мемо текст превышает 35 строк то начать копирование текста с конца строк Memo1 до ближайшего встретившегося #13 перед или на 35 строке, вставить этот скопированный текст в Memo2 и удалить этот же текст с Memo1
Как это сделать в одном цикле? |
25.06.2015, 12:37 | #2 | |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,515
|
Цитата:
то бишь ПОСЛЕДНЮЮ и ТОЛЬКО строку? или же ВСЕ строки ПОСЛЕ 35-ой в ОБРАТНОМ порядке ? Код:
Код:
программа — запись алгоритма на языке понятном транслятору
Последний раз редактировалось evg_m; 25.06.2015 в 12:45. |
|
25.06.2015, 13:49 | #3 |
Форумчанин
Регистрация: 22.11.2014
Сообщений: 109
|
evg_m, Спасибо Огромное! Попробовал Ваш пример, работает!
Вы извените меня я неправильно задал вопрос Если мемо больше 35 строк то начать подниматься вверх от 35 строки до ближайшей пустой строки (я незнаю как определить пустую строку) и от следующей после пустой начать копировать и удалять до конца строк? Последний раз редактировалось S_007; 25.06.2015 в 13:51. |
25.06.2015, 14:02 | #4 | |
Старожил
Регистрация: 17.11.2010
Сообщений: 19,042
|
Цитата:
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
|
25.06.2015, 15:53 | #5 |
Форумчанин
Регистрация: 22.11.2014
Сообщений: 109
|
Аватар, Благодарю!
Не могу понять - почему не удаляется остаток от строки которые мемо перенесла сама на новую строку из за того что они не влезли по ширине, Что это значит? как их удалять? Может вначале нужно пробежаться по всем строкам и в каждую воткнуть символ начала строки или что то еще чтоб все перенесенные огрызки от строк имели индекс? |
25.06.2015, 16:50 | #6 | |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,515
|
Цитата:
Код:
Что мы должны получить в Memo2 ?
программа — запись алгоритма на языке понятном транслятору
|
|
25.06.2015, 17:36 | #7 |
Форумчанин
Регистрация: 22.11.2014
Сообщений: 109
|
evg_m, Спасибо Большое!!! Вы очень помогли, почти разобрался, только еще не понял как находить в мемо #13 или #10
|
25.06.2015, 17:45 | #8 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,238
|
Цитата:
(кстати, всего строчек в memo = memo1.Lines.Count ) Зачем Вам ещё что-то искать?!! Может быть, Вы сформулируете (подробно, конкретно, с примерами) КАКУЮ задачу Вы решаете и мы вместе подумаем, как её лучше решить? |
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
[Delphi] Кракозябры при копирование текста в другую программу | JonMagon | Помощь студентам | 2 | 11.12.2018 19:59 |
РАЗБИЕНИЕ ТЕКСТА НА ДВА ПОЛЯ Memo, Delphi | kapiton | Помощь студентам | 15 | 06.10.2014 15:20 |
Delphi передача текста из memo в memo | hauk70 | Помощь студентам | 27 | 22.05.2012 18:33 |
Копирование текста из Memo | bulkin2000 | Компоненты Delphi | 3 | 30.04.2012 14:03 |