| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вставка символа в RichEdit [D6, Win95/98, Win2k]
MAxiMum © (2002-06-27 18:13:00)Не могу вставить символ в RichEdit. Есть своя таблица символов.
Использую em_replacesel, вставляет по любому русский символ, даже если кодировка у меня какая-нибудь иврит. Как быть?
И еще вопрос. Допустим, это получится, а как потом можно пройтись по компоненту и прочесть значения символа и characterset для него (чтобы потом можно было сохранить в формате: characterset: Byte, symbol: char)?
MAxiMum (2002-07-01 11:01:00) [1]Интересно, а почему под Windows 98 работает, а под Windows 2000 - нет?
Игорь Шевченко (2002-06-27 19:02:00) [2]На скорую руку:
procedure TForm1.Button4Click(Sender: TObject);
var
SelSt, Selln : Integer;
begin
SelSt := Length(RichEdit1.Lines[0]);
SelLn := Length(Edit1.Text);
RichEdit1.Lines[0] := RichEdit1.Lines[0] + Edit1.Text;
RichEdit1.SelStart := SelSt;
RichEdit1.SelLength := SelLn;
RichEdit1.SelAttributes.CharSet := HEBREW_CHARSET;
end;
Ввожу в Edit1 русский текст, в RichEdit получается иероглифами :)
D5, NT4
MAxiMum (2002-06-27 18:28:00) [3]Ау!!!
| |
