Форум: "Основная";
Текущий архив: 2005.02.27;
Скачать: [xml.tar.bz2];
ВнизЗамена символов в TEdit e... Найти похожие ветки
← →
vigo (2005-02-14 11:49) [0]Добрый день! У меня вопрос по поводу замены символов в TEdit"e. Есть необходимость замены символа Ё на Е. Как правильно прописать обработчик события OnKeyPress (или OnExit)?
← →
Александр Иванов © (2005-02-14 11:51) [1]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = "ё" then
Key:="е"
else
if Key = "Ё" then
Key:="Е";
end;
← →
Ega23 © (2005-02-14 12:04) [2]2 Александр Иванов © (14.02.05 11:51) [1]
И на выходе тоже надо проверять, т.к. в Edit из буфера текст можно вставить.
← →
VMcL © (2005-02-14 12:27) [3]>>vigo (14.02.05 11:49)
OnChange или как-то так.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.02.27;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.04 c