На форме лежит RxRichEdit1 и RxRichEdit1.ReadOnly:=True;
Пишу такой код:
unit unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, RxRichEd;
type
TForm1 = class(TForm)
RxRichEdit1: TRxRichEdit;
procedure RxRichEdit1KeyPress(Sender: TObject; var Key: Char);
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.RxRichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
RxRichEdit1.Lines[0]:=RxRichEdit1.Lines[0]+Key;
end;
end.
Здесь у меня происходят глюки. Когда раскладка русская, текст вводится нормально, потом переключаю на английскую, и после того как добавился английский текст, вместо русских букв появляются вопросы. Т.е. так:
Вместо того, что должно быть "ЛёшаAlex", появляется "????Alex".
Здесь дело в TRxRichEdit.
Кто-нибудь встречался с такой проблемой? Не знаю, где нужно править в RxRichEd.pas, чтобы нормально отображались символы.