Форум: "Основная";
Текущий архив: 2004.06.06;
Скачать: [xml.tar.bz2];
Вниз
Как в RichEdit выравнить текст по ширине? Найти похожие ветки
← →
Dmitry (2004-05-25 15:51) [0]Как в RichEdit выравнить текст по ширине? Подскажите алгоритм, организации такой функции...
← →
Shkut © (2004-05-25 16:05) [1]Делфи наследует стандартный RichEdit Windows, в WordPad и в примере Borland для RichEdit нет ни слова про выравнивание по ширине. Скорее всего это свойство не реализовано в этом классе.
← →
Shkut © (2004-05-25 16:09) [2]Делфи наследует стандартный RichEdit Windows, в WordPad и в примере Borland для RichEdit нет ни слова про выравнивание по ширине. Скорее всего это свойство не реализовано в этом классе.
← →
VAleksey © (2004-05-25 17:40) [3]Для стандартного - это невозможно.
← →
MetalFan (2004-05-25 18:32) [4]возможно... juct a moment... счас дам код
← →
MetalFan (2004-05-25 18:49) [5]
uses RichEdit;
....
var
Format: TParaFormat;
const
EM_SETTYPOGRAPHYOPTIONS = WM_USER + 202;
EM_GETTYPOGRAPHYOPTIONS = WM_USER + 203;
TO_ADVANCEDTYPOGRAPHY = $0001;
begin
RichEdit1.SelectAll;
Format.cbSize := SizeOf(Format);
Format.dwMask := PFM_ALIGNMENT;
Format.wAlignment := 4;
if SendMessage(RichEdit1.Handle, EM_SETTYPOGRAPHYOPTIONS,
TO_ADVANCEDTYPOGRAPHY, TO_ADVANCEDTYPOGRAPHY) <> 0 then
begin
SendMessage(RichEdit1.Handle, EM_GETTYPOGRAPHYOPTIONS, 0, 0);
SendMessage(RichEdit1.Handle, EM_SETPARAFORMAT, 0, Integer(@Format));
end;
...
← →
WebErr © (2004-05-25 18:54) [6]Ну пошлём мы в компонент собственные сообщения, обрабатывать их кто будет? :)
← →
Andy BitOff © (2004-05-25 18:55) [7]Сей ответ достоин помещения в FAQ.
← →
WebErr © (2004-05-25 18:55) [8]А что за TParaFormat ?
← →
Elast (2004-05-25 18:58) [9]В королевстве была процедура - ByWidth. Если не найдется - могу выслать.
← →
Fay © (2004-05-25 19:07) [10]2WebErr © (25.05.04 18:55) [8]
uses RichEdit;
← →
Fay © (2004-05-25 19:08) [11]typedef struct _paraformat {
UINT cbSize;
DWORD dwMask;
WORD wNumbering;
WORD wReserved; // RichEdit 2.0: this is wEffects
LONG dxStartIndent;
LONG dxRightIndent;
LONG dxOffset;
WORD wAlignment;
SHORT cTabCount;
LONG rgxTabs[MAX_TAB_STOPS];
} PARAFORMAT;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.06.06;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.046 c
