Редактирование текста в Memo

@bigar · Регистрация: 18.02.2011

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста с задачей.
Дан текст и число m. Нужно вывести этот текст строками длины m, делая выравнивание строк по ширине.

@aleks.halk · 07.03.2011, 21:14

немного не ясна задача.
если весь текст хранится в строковой переменной, то проблемы нет.
создаешь 2 цикла и выводишь в мемо по m символов.
опиши поподробнее проблему

@bigar · 07.03.2011, 21:43 **[ТС]**

Сообщение от aleks.halk

немного не ясна задача.
если весь текст хранится в строковой переменной, то проблемы нет.
создаешь 2 цикла и выводишь в мемо по m символов.
опиши поподробнее проблему

С самим выводом разобрался уже, а от с выравниванием по ширине никак...как росчитать и правильно добавить пробелы??? даж не знаю с чего начать...

@*~<`PIK`>~* · 08.03.2011, 00:23

Сообщение от bigar

как росчитать и правильно добавить пробелы??

Ровно у тебя никогда не получится=)))лучше просто выставить у мемо шрифт Courier New и будет все ровно=)))

@bigar · 08.03.2011, 12:32 **[ТС]**

Сообщение от *~<`PIK`>~*

Ровно у тебя никогда не получится=)))лучше просто выставить у мемо шрифт Courier New и будет все ровно=)))

Как это програмно можно реализовать?

Добавлено через 3 часа 32 минуты
ребят ну помогите)) как вставить пробелы если например уже есть готовый текст строками определленой длины
например

Delphi

После начала карьеры в ко
манде Университета Северн
ой Каролины (1982—1984), 
с которой он выиграл чемп
ионат NCAA 1982 года, Джо
рдан присоединился к кома
нде «Чикаго Буллз» в 1984
году. Он быстро стал звез
дой НБА, очаровав публику
своей результативной игро
й.

у меня в Мемо это по левому краю и ище остается несколько символов до конца строки вот мне нужно растянуть его

@Saninho · 07.02.2013, 19:31

У меня такая же проблема) Помогите ему)))

@volvo · 08.02.2013, 13:59

Сообщение от Saninho

Помогите ему)))

Главное - ему, хотя у тебя такая же проблема...

Не проверял, набирал прямо здесь:

Delphi

const len = 25;
var i : integer;
begin
  // Вот тут текст
  s := 'После начала карьеры в команде бла-бла-бла...';
 
  // Вот разбиение
  for i := 1 to length(s) div len do
    Insert(#13#10, s, Pred(i) * (len + 2) + len + 1);
 
  Memo1.Font.Name := 'Courier New';
  Memo1.Lines.Text := s; // подсовываем разбитую строку в Memo
end;

Новые блоги и статьи
В чем отличие между INNER JOIN и OUTER JOIN bytestream 22.01.2025 В современных базах данных информация часто распределена между множеством взаимосвязанных таблиц, что делает операции объединения JOIN неотъемлемой частью работы с SQL. Эти операции позволяют. . .	Как сделать первую букву заглавной в JavaScript bytestream 22.01.2025 JavaScript предоставляет разработчикам множество инструментов для эффективной работы с текстовыми данными. Одной из часто встречающихся задач при обработке строк является преобразование первой буквы. . .	Что такое Big O нотация и алгоритмическая сложность bytestream 22.01.2025 Введение в алгоритмическую сложность В мире разработки программного обеспечения эффективность алгоритмов играет crucial роль в создании качественных приложений. Алгоритмическая сложность. . .	Как решать конфликты слияния (merge) в Git bytestream 22.01.2025 Конфликты слияния в системе контроля версий Git возникают в ситуациях, когда две или более ветки разработки содержат несовместимые изменения в одних и тех же участках кода. Эти конфликты представляют. . .	Как использовать регулярные выражения bytestream 22.01.2025 Регулярные выражения представляют собой мощный инструмент для работы с текстовыми данными, который позволяет осуществлять поиск, проверку и манипуляцию строками на основе определенных шаблонов. Этот. . .	Как выйти из Vim bytestream 22.01.2025 Vim (Vi IMproved) представляет собой один из самых влиятельных текстовых редакторов в истории компьютерной индустрии, эволюционировавший из своего предшественника Vi, созданного Биллом Джоем в 1976. . .
NoSQL базы данных: что это такое и какие существуют bytestream 22.01.2025 В современную эпоху цифровой трансформации объемы данных растут экспоненциально, создавая новые вызовы для традиционных систем управления базами данных. NoSQL (Not Only SQL) представляет собой. . .	Обновление исследования от команды MCM (январь 2025 г.) Programma_Boinc 22.01.2025 Обновление исследования от команды MCM (январь 2025 г. ) Мы продолжаем изучать молекулярные сигнатуры, связанные с раком легких, с текущим фокусом на GCM1, факторе транскрипции, участвующем в. . .	Как работать с Kafka в Go (Golang) bytestream 22.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки событий и интеграции микросервисов. Эта система, изначально. . .	Как использовать RabbitMQ в Go (Golang) bytestream 22.01.2025 RabbitMQ представляет собой надежный и широко используемый брокер сообщений, который играет ключевую роль в построении современных распределенных систем и микросервисной архитектуры. В основе работы. . .	Как преобразовать список списков в простой список в Python bytestream 22.01.2025 При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .	Что такое GUID / UUID и как их создать bytestream 22.01.2025 В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .

@bigar 53 / 53 / 36 Регистрация: 18.02.2011 Сообщений: 146
		1
	Редактирование текста в Memo 06.03.2011, 11:06. Показов 3375. Ответов 6 Метки нет (Все метки) Помогите пожалуйста с задачей. Дан текст и число m. Нужно вывести этот текст строками длины m, делая выравнивание строк по ширине. 0

@aleks.halk 0 / 0 / 0 Регистрация: 06.06.2010 Сообщений: 14
	07.03.2011, 21:14	2
	немного не ясна задача. если весь текст хранится в строковой переменной, то проблемы нет. создаешь 2 цикла и выводишь в мемо по m символов. опиши поподробнее проблему 0

@bigar 53 / 53 / 36 Регистрация: 18.02.2011 Сообщений: 146
	07.03.2011, 21:43 [ТС]	3
	Сообщение от aleks.halk немного не ясна задача. если весь текст хранится в строковой переменной, то проблемы нет. создаешь 2 цикла и выводишь в мемо по m символов. опиши поподробнее проблему С самим выводом разобрался уже, а от с выравниванием по ширине никак...как росчитать и правильно добавить пробелы??? даж не знаю с чего начать... 0

@~<`PIK`>~ ﻌﺹ ﺦ ﺖﻀ ﺹ ﻙ ﺵﻔ ﺊ ﺘﺝ 607 / 387 / 81 Регистрация: 15.12.2009 Сообщений: 753
	08.03.2011, 00:23	4
	Сообщение от bigar как росчитать и правильно добавить пробелы?? Ровно у тебя никогда не получится=)))лучше просто выставить у мемо шрифт Courier New и будет все ровно=))) 0

@Saninho 0 / 0 / 1 Регистрация: 29.01.2013 Сообщений: 81
	07.02.2013, 19:31	6
	У меня такая же проблема) Помогите ему))) 0

	08.02.2013, 13:59