Выравнивание текста TRichEdit по ширине

@Infinity3000 · Регистрация: 03.12.2009

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

Здравствуйте!

Нужна помощь в написании кода для выравнивания текста в RichEdit по ширине!

Облазил кучу тем но решения не нашел!

Стороний компонент типа RxRichEdit не предлогать!

Нужно решить данную проблему именно с RichEdit.

Спасибо!

Добавлено через 16 минут
Нашел такой код!)

Вроде даже работает!

C++
1
2
3
4
5
6
7
PARAFORMAT2 paraformat;
 
 SendMessage(RichEdit1->Handle, EM_SETTYPOGRAPHYOPTIONS, TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY);
 paraformat.cbSize = sizeof(PARAFORMAT2);
 paraformat.dwMask = PFM_ALIGNMENT;
 paraformat.wAlignment = PFA_JUSTIFY;
 SendMessage(RichEdit1->Handle, EM_SETPARAFORMAT, 0, Integer(&paraformat));

Если будут другие варианты, буду раз расмотреть!)))))

cpp_developer · 14.01.2012, 22:34

PARAFORMAT2 Structure

wAlignment - Paragraph alignment. To use this member, set the PFM_ALIGNMENT flag in the dwMask member. This member can be one of the following values.
PFA_LEFT - Paragraphs are aligned with the left margin.
PFA_RIGHT - Paragraphs are aligned with the right margin.
PFA_CENTER - Paragraphs are centered.
PFA_JUSTIFY - Rich Edit 2.0: Paragraphs are justified. This value is included for compatibility with TOM interfaces; rich edit controls earlier than Rich Edit 3.0 display the text aligned with the left margin.
PFA_FULL_INTERWORD - Paragraphs are justified by expanding the blanks alone.

@Infinity3000 · 14.01.2012, 23:13 **[ТС]**

Этот код выравнивает по левому краю или это я уже гоню!

C++
1
2
3
4
5
6
7
PARAFORMAT2 paraformat;
 
 SendMessage(RichEdit1->Handle, EM_SETTYPOGRAPHYOPTIONS, TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY);
 paraformat.cbSize = sizeof(PARAFORMAT2);
 paraformat.dwMask = PFM_ALIGNMENT;
 paraformat.wAlignment = PFA_JUSTIFY;
 SendMessage(RichEdit1->Handle, EM_SETPARAFORMAT, 0, Integer(&paraformat));

cpp_developer · 15.01.2012, 01:07

хочет оно Rich Edit 3.0

rich edit controls earlier than Rich Edit 3.0 display the text aligned with the left margin. - ричэдит версии ниже 3 отображает текст с выравниванием по левому полю

@Infinity3000 · 15.01.2012, 01:19 **[ТС]**

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

хочет оно Rich Edit 3.0

я то понял перевод!))) английский на нормальном уровне!) в школе научили!))

Да выравнивает оно по левому! Как выравнять по ширине!??

Не по теме:

Возможно я туплю, через 40 мин ровно сутки как не сплю и наверно и не лягу( Сюда обращаюсь от безисходности!

cpp_developer · 15.01.2012, 01:33

ну и вот

Надо просто послать ричедиту сообщение EM_SETTYPOGRAPHYOPTIONS с параметрами
TO_ADVANCEDTYPOGRAPHY.

В мфц для 6 — го VC эти констаны не описаны. Так что, возможно, придется
объявлять самому :

C++
1
2
#define EM_SETTYPOGRAPHYOPTIONS (WM_USER + 202)
#define TO_ADVANCEDTYPOGRAPHY 0x0001

шлем :

C++
1
2
m_rich.SendMessage(EM_SETTYPOGRAPHYOPTIONS,
        TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY);

для CRichEditView — через GetRichEditCtrl.

после этого работает обычная схема с SetParaFormat.

C++
1
2
3
4
5
6
PARAFORMAT2 pf;
ZeroMemory(&pf, sizeof(pf));
pf.cbSize = sizeof(pf);
pf.dwMask = PFM_ALIGNMENT;
pf.wAlignment = PFA_JUSTIFY;
m_rich.SetParaFormat(pf);

Ричедит узнает о версии структуры (PARAFORMAT или PARAFORMAT2) по ее размеру.

Добавлено через 1 минуту
тут понятнее с отправкой сообщения

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses RichEdit;
 
procedure TForm1.Button1Click(Sender: TObject);
const EM_SETTYPOGRAPHYOPTIONS = WM_USER + 202;
TO_ADVANCEDTYPOGRAPHY = $0001;
var paraformat: PARAFORMAT2;
begin
SendMessage(RichEdit1.Handle, EM_SETTYPOGRAPHYOPTIONS, TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY);
paraformat.cbSize := sizeof(PARAFORMAT2);
paraformat.dwMask := PFM_ALIGNMENT;
paraformat.wAlignment := PFA_JUSTIFY;
SendMessage(RichEdit1.Handle, EM_SETPARAFORMAT, 0, Integer(@paraformat));
end;

Добавлено через 6 минут
получится - отпишитесь , не получится - сами, наверное, отпишетесь

@Infinity3000 · 15.01.2012, 01:47 **[ТС]**

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

получится - отпишитесь , не получится - сами, наверное, отпишетесь

Неа, не чего не выходит! уже как только не извращался над кодом!! Изменение с текстом в RichEdit'e происходят! какието смещение происходит, одна строка выравнялась по ширине, на другой вообще одно слово осталось!

Провал!

cpp_developer · 15.01.2012, 01:49

а одно слово тоже надо было по ширине ?

@Infinity3000 · 15.01.2012, 01:57 **[ТС]**

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

а одно слово тоже надо было по ширине ?

Нет конечно!) Просто хотелось бы сделать что то типа как MS Word! Просто так оно читебельней! а то получаеться справа строки как обгрызанные, та и по ГОСТу так надо!

cpp_developer · 15.01.2012, 02:05

это я не понял

@Infinity3000 · 15.01.2012, 02:11 **[ТС]**

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

это я не понял

Теперь я не понял!

cpp_developer · 15.01.2012, 02:16

справа строки как обгрызанные

вы имеете ввиду при выравнивании текста слева

)) ?

@Infinity3000 · 15.01.2012, 02:22 **[ТС]**

вот напримере MS Word!

Выравнивание по ширине (Рис. 1) хочеться получить такое в RichEdit'e

Выравниваение по левому краю (Рис. 2) (Ужас).

@Infinity3000 · 15.01.2012, 14:29 **[ТС]**

Все прекрасно получилось.

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

В мфц для 6 — го VC эти констаны не описаны. Так что, возможно, придется
объявлять самому :

C++
1
2
#define EM_SETTYPOGRAPHYOPTIONS (WM_USER + 202)
#define TO_ADVANCEDTYPOGRAPHY 0x0001

Не нужно!

Вот этот код вполне работоспособен!

C++
1
2
3
4
5
6
7
8
9
10
__fastcall TForm6::TForm6(TComponent* Owner)
    : TForm(Owner)
{
 PARAFORMAT2 paraformat;
 SendMessage(RichEdit1->Handle, EM_SETTYPOGRAPHYOPTIONS, TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY);
 paraformat.cbSize = sizeof(PARAFORMAT2);
 paraformat.dwMask = PFM_ALIGNMENT;
 paraformat.wAlignment = PFA_JUSTIFY;
 SendMessage(RichEdit1->Handle, EM_SETPARAFORMAT, 0, Integer(&paraformat));
}

Который был изначально предложен уважаемым человеком LK!

Проблема была лишь в том что, я добавлял текст в RichEdit через Object Inspector, свойство Lines!

Нужно текст грузить либо из файла, либо из ресурсов, либо програмно как строку RichEdit!
Тогда все будет прекрасно работать!

Новые блоги и статьи Все статьи Все блоги /
http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Первый деплой lagorue 16.01.2026 Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	15.01.2012, 01:49
	а одно слово тоже надо было по ширине ? 1

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	15.01.2012, 02:05
	это я не понял 1

@Infinity3000 1066 / 583 / 87 Регистрация: 03.12.2009 Сообщений: 1,255
	15.01.2012, 02:22 [ТС]
	вот напримере MS Word! Выравнивание по ширине (Рис. 1) хочеться получить такое в RichEdit'e Выравниваение по левому краю (Рис. 2) (Ужас). Миниатюры 0