в Edit1.text вводились только русские буквы

← →
Andy (2003-11-14 15:26) [0]

Здравствуйте Мастера!!! Подскажите, пожалуйста, как сделать, чтобы при входе в Edit1.text вводились только русские буквы?

← →
Игорь Шевченко © (2003-11-14 15:31) [1]

в OnKeyPress проверять

← →
Prov © (2003-11-14 15:33) [2]

Создай масив, который состоит только из русского алфавита, и при событии Edit1.onChange сравнивай введённый символ с имеющимися в массиве... Правда это слишком криво..

← →
Prov © (2003-11-14 15:34) [3]

а, ну да, тю ты блин,а самом деле, onKeyPress проверяй, можно так:

onKeyPress

if not key= VK_ESCAPE then
key:= #0

← →
Andy (2003-11-14 15:35) [4]

А что именно и как в OnKeyPress проверять

← →
Dimich1978 © (2003-11-14 15:42) [5]

Да в выше упомянутом методе смотреть коды клавишь, и отсеивай которые не нужны.

IF Ord(Key)>... then Key:=...

В OnKeyPress:
if Key in ["А".."я"] then...

в Edit1.text вводились только русские буквы Найти похожие ветки