InsertTextEx
Назначение
Вставка текста в позицию курсора ввода с возможность указать цвет, размер, стиль и имя шрифта.
Описание
procedure InsertTextEx (const text: String; FontColor: TColor = -1; FontSize: integer = -1; FontStyles: Integer = -1; FontName: string = '');
Параметр |
Назначение |
text |
Текст, который будет вставлен в документ. |
FontColor |
Необязательный параметр. Цвет шрифта. Подробней о типе TColor. |
FontSize |
Необязательный параметр. Размер шрифта. |
FontStyles |
Необязательный параметр. Стиль шрифта. Значения: fsBold, fsItalic, fsUnderline, fsStrikeout |
FontName |
Необязательный параметр. Имя шрифта. |
Пример
Form1.RichEdit1.InsertTextEx('текст', clRed, 16, fsBold+fsItalic+fsUnderline+fsStrikeout, 'Arial');
Form1.RichEdit1.InsertTextEx('текст', clGreen, 14, fsBold+fsItalic);