Текущий архив: 2002.08.08;
Скачать: CL | DM;
Вниз
Помогите мне Найти похожие ветки
← →
Stepan © (2002-07-23 16:13) [0]Как отобразить в RichEdit французкий шрифт
Некоторые символы которые есть только во французком не отображаются!!!!
← →
nick_sniper © (2002-07-25 01:05) [1]Мне кажется что простыми методами - никак.
Теоретически вот так:
RichEdit1.SelAttributes.Charset := EASTEUROPE_CHARSET;
Но, помоему, это не сработает.
Наверное нужно править в прямо в .rtf - там должно почучиться. (Это формат в котором ричедитор сохраняет текст. Это универсальный формат и описуху на него, по моему, можно даже на этом сайте найти).
← →
KilkennyCat © (2002-07-25 01:12) [2]RichEdit1.SelAttributes.Charset - это на выделенный шрифт.
так что, не сработает, если не выделить :)
← →
nick_sniper © (2002-07-25 02:06) [3]Нашел.
Я тоже когда-то встретился с такой проблемой.
Вот кусок кода:
function TRichMainForm.CurrText: TTextAttributes;
begin
if Editor.SelLength > 0 then Result := Editor.SelAttributes
else Result := Editor.DefAttributes;
end;
procedure TRichMainForm.SelectFont(Sender: TObject);
begin
FontDialog1.Font.Assign(Editor.SelAttributes);
if FontDialog1.Execute then
CurrText.Assign(FontDialog1.Font);
Editor.SetFocus;
end;
procedure TRichMainForm.SetCharset;
begin
CurrText.Charset := EASTEUROPE_CHARSET;
end;
Думаю разберешься что к чему. Но не забудь: для того чтобы в ричедиторе писать французкими буквами нужно в виндах добавить французкий язык, переключиться на него и тогда все будет чики-пики. Ну само, собой нужно вызвать SetCharset;
← →
December24 (2002-07-26 17:31) [4]Как всё сложно... я просто перебирал CharSet"ы, пока не нашёл нужный... И не все фонты поддерживают французский.
Страницы: 1 вся ветка
Текущий архив: 2002.08.08;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.02 c
