Jak w Rich Edit:
W Source jest jakiś nagłówek RichEdit.pas z m.in. dodatkowymi paramtrami Paragraph, ale nie wiem jak to wykorzystać.
Pozdrawiam
Cześć!
Oto kawałek pewnego ciekawego artykułu na temat RichEdit :
"Pole RichEdit pozwala na storzenie całkiem ciekawego edytora tekstu. Oto opis podstawowych operacji na tekście możliwych dzięki niemu.
RichEdit.Paragraph ( atrybuty aktualnego paragrafu ) :
Numbering - tworzy wypunktowanie. Możliwe wartości to: nsBullet ( czarna kropka ), nsNone ( brak wypunktowania).
LeftIndent - Lewy margines. Wartość podaje się w Integer.
RightIndent - To samo co na górze tyle że, z prawej strony.
First Indent - Akapit. Wartość w Integer.
RichEdit.SelAttributes ( atrybuty zaznaczonego tekstu ):
Charset - sposub wyświetlania czcionki ( np. cyrylica, europa zachodnia, znaki japońskie ).
Color - kolor czcionki :)
Name - Rodzaj czcionki. ( np. TimesNewRoman ).
Size - Rozmiar. Liczba Integer interpretowana identycznie jak w Wordzie.
Style - Styl czcionki. Możliwe wartości to:fsBold, fsItalic, fsUnderline, fsStrikeout
RichEdit.DefAttributes - możliwości są podobne co w SelAttributes, jednak odnosi się do wartości domyślnych
Postanowiłem umiścić tu jeszcze jedną funkcję która może się przydać, mianowicie pobranie listy czcionek:
Screen.Fonts - podaje listę dostępnych czcionek."
W borlandowym RichEdit to nierealne, niestety...
Niby z helpa wynika nierealne, ale jak się wstawi w Numbering na siłę 2
Numbering:=TNumberingStyle(2)
to numerki są tylko, że od 0.
Poza tym, jak zapiszesz tekst z punktowanie w Word i go otworzysz w Rich to jest.
Pozdrawiam
No to w koncu to rozpracowałem :-D
Trzeba wykorzystać nowy typ TParaFormat2.
Np. aby wyjustować tekst wystarczy:
pf.dwMask := PFM_ALIGNMENT;
pf.wAlignment := PFA_JUSTIFY;
SendMessage(Editor.Handle, EM_SETPARAFORMAT, 0, lparam(@PF));
jak sie już to wie, to punktowanie numerkami to pikuś, przetestuję jeszcze inne możliwości.
Aha, testuje to na Delphi7 i nie wiem czy działa na wcześniejszych wersjach.
Kris
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.
