Forum > Russian

Некорректно копирует символы из TMemo. Incorrectly copies characters from TMemo

<< < (2/2)

Zeno:
Как тогда заставить такой простой с виду код:

procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: char);
begin
  label1.caption:= label1.caption+Key;
end;

корректно обрабатывать русские символы? С латиницей все в порядке, а вот вместо кириллических символов одни знаки вопроса. Здесь ведь переменная Key типа char. Как сделать UTF8Char?

skalogryz:
кроме OnKeyPress, ещё есть обработчик OnUTF8KeyPress, именно его и нужно использовать.


--- Code: Pascal  [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---procedure TForm1.Memo1UTF8KeyPress(Sender: TObject; var UTF8Key: TUTF8Char);begin   label1.caption:= label1.caption+UTF8Key;end;    

Zeno:
Спасибо, помогло!

Navigation

[0] Message Index

[*] Previous page