|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.05.2009, 13:17 | #1 |
Заблокирован
Регистрация: 06.04.2009
Сообщений: 130
|
Перенос слов
Как переносить слова, разрывая их в конце текстового поля, остальное слово переносится на новую строчку, можно не по слогам. У меня сейчас стои мемо, но мне без разницы какое будет текстовое поле, можно лабел, едит или есть какой-то компонент с такой функцией?
В инете находил все одну и ту же функцию для этого, но при запуске программы с ней выскакивает ошибка. Или как можно организовать такой алгоритм?: For i:=Начало_текста_Memo to Конец текста_Memo do if Количество символов не влезает в мемо then Перенести на следующую строку невлезающие символы. |
02.05.2009, 13:26 | #2 | |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Что-то не понял.
Цитата:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
|
02.05.2009, 13:38 | #3 |
Форумчанин
Регистрация: 06.03.2009
Сообщений: 583
|
конечно для этих целей лучше использовать WordWrap.
Но если хочется принудительно сделать переносы, то можно примерно так Код:
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
|
02.05.2009, 13:40 | #4 |
Заблокирован
Регистрация: 06.04.2009
Сообщений: 130
|
|
02.05.2009, 13:48 | #5 | |
Заблокирован
Регистрация: 06.04.2009
Сообщений: 130
|
Цитата:
|
|
02.05.2009, 16:54 | #6 |
Заблокирован
Регистрация: 06.04.2009
Сообщений: 130
|
Не могу эту функцию настроить нормально.
|
02.05.2009, 17:19 | #7 |
Форумчанин
Регистрация: 06.03.2009
Сообщений: 583
|
Вот исправленный вариант, если строка = 25 символов.
Исправить надо было в copy(str,nach,25) -где str вся строка, nach- c какого символа копировать, 25 - количество скопированных символов. Код:
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
|
02.05.2009, 20:08 | #8 |
Заблокирован
Регистрация: 06.04.2009
Сообщений: 130
|
Спасибо, но при изменении количества символов в строке опять все сбивается. Меняю все(3) 25 на 50. И при изменении шрифта это не будет работать.
|
02.05.2009, 20:58 | #9 |
Форумчанин
Регистрация: 06.03.2009
Сообщений: 583
|
Странно изменял параметры все работает нормально, выкладывай исходный код как изменял.
Код:
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перенос слов в StringGrid | artemavd | Общие вопросы Delphi | 1 | 17.03.2009 15:58 |
перенос слов | АлёнаP | Microsoft Office Access | 0 | 17.03.2009 09:29 |
Составить в алфавитном порядке список всех слов, встречающихся в тексте, и количество этих слов. | KAPAHDAW | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 17.02.2009 01:19 |
Перенос слов по слогам (не могу разобраться с алгоритмом) | Only Love | Помощь студентам | 1 | 21.05.2007 22:43 |