Здравствуйте !
> Не подскажет ли ето нибудь есть ли в RichEdit (Delpohi 6) свойство
> выравнивания текста по обоим краям
Есть. И не только в делфи (т.к. ричедит - просто виндовый контрол,
обертка не важна). Но это должен быть RichEdit как минимум версии 3.0
или выше (так пишут в MSDN). Он идет начиная с Windows 2000.
По крайней мере, в моих прогах под Win2000 текст по ширине выравнивается.
Чтобы можно было данную фичу юзать (выравнивание по ширине), надо
для ричедита спец. опции установить. Это достигается посылкой сообщения
EM_SETTYPOGRAPHYOPTIONS с lParam и wParam равными TO_ADVANCEDTYPOGRAPHY.
То есть :
::SendMessage(hWnd, EM_SETTYPOGRAPHYOPTIONS, TO_ADVANCEDTYPOGRAPHY,
TO_ADVANCEDTYPOGRAPHY);
Не знаю, определены ли в делфи эти константы, но на всякий случай
приведу :
EM_SETTYPOGRAPHYOPTIONS равен (WM_USER + 202)
TO_ADVANCEDTYPOGRAPHY равен 0x0001
hWnd - это, ессно - дескриптор окна контрола (наверно в делфи
соответствующий дескриптор окна компонента получить элементарно).
Теперь - о выравнивании.
Возможно, в делфи после посылки вышеописанного сообщения все заработает
(просто попробовать установить свойству выравнивания (если такое есть)
значение PFA_JUSTIFY (0x0004)), а, может и не заработает.
Тогда можно с помощью API выровнять (извиняйте, но код на C):
PARAFORMAT2 paraformat;
paraformat.cbSize = sizeof(PARAFORMAT2);
paraformat.dwMask = PFM_ALIGNMENT;
paraformat.wAlignment = PFA_JUSTIFY;
::SendMessage(hWnd, EM_SETPARAFORMAT, 0, (LPARAM) ¶format2);
Вот :-)
Кстати, пока писал письмо, посмотрел в гугле.
Вот что нашел :
Вот отсюда :
http://www.delphi32.com/vcl/472/
или отсюда :
http://www.fortunecity.com/skyscraper/capacity/586/downdir.htm
есть ссылки для скачивания компонента "RichEdit 98".
Не уверен, но может быть, он умеет выравнивать текст по ширине.
З.Ы. По последней ссылке еще всякие компоненты лежат.
Удачи !
--
С уважением, Вахтуров Виктор.
Информационный сайт для программистов http://SoftMaker.fatal.ru
Номер выпуска : 3346
Возраст листа : 281 (дней)
Количество подписчиков : 431
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/181159
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать : mailto:comp.soft.prog.prog--unsub@subscribe.ru
http://subscribe.ru/ mailto:ask@subscribe.ru