[RusMaXXX]

Всем день добрый ...

Вопрос следующий:
Каким образом можно вставить символ в TRichEdit.?
Уточняю символ, т.е. подобие того как это реализованна "вставка символа" в MicroSoft Office'e.

Спасибо за внимание ......

[san-46]

Интерактивно, при вводе ALT+0010 (цифры набираются на цифровой части клавиатуры), например, вставит "перевод строки". ALT+009 вставит символ табуляции.
Программно: RichEdit1.Text := RichEdit1.Text + #10 (вместо 10 подставляется код символа, который надо вставлять).

[RusMaXXX]

Спасибо за ответ, но это то понятно, таким способом можно вводить символы к примеры в блокноте ... а где можно взять весь список этих символов и соответственно сочетания клавиш к ним. и ещё, в этом способе присутствуют вроде бы не все символы которые есть в MicroSoft Office'e.

[san-46]

В системных шрифтах и шрифтах поставляемых с Windows (TrueType и OpenType) таких символов просто нет.
Поэтому и вставить их невозможно. Для этого надо найти в инете шрифты, в которых
есть все символы с кодом меньше 32 и при необходимости вставлять их в текст менять шрифт на тот, где они есть.
А MS Word вещь в себе и никто разработчикам этой вещицы не мешает иметь внутри приложения описания спец. символов и их обработку.

[RusMaXXX]

это получается можно создать свой собственный шрифт (с нужными символами) и потом его использовать....!?

[san-46]

Если найдете редактор TrueType шрифтов и потратите часть оставшейся жизни на изучение построение шрифтов с его помощью, то почему же нет. Вполне можно. Когда со шрифтами было туго (давно, давно) многие так и поступали.
Но самое простое - найти уже готовый шрифт. Их на просторах инета как гуталина на гуталиновой фабрике. Единственная трудность: найти именно такой, в котором есть символы с кодами < 32.

[mak-karpov]

Береш, пишешь

Код:

...
var i : Integer;
begin
for i := 0 to 255 do
Memo1.Lines.Add(IntToStr(i)+': '+chr(i));