Текущий архив: 2002.06.24;
Скачать: CL | DM;
Вниз
Как обычно, прошу помощи... Найти похожие ветки
← →
QWest (2002-06-13 10:35) [0]Здравствуйте мастера.У меня такой вопрос - ната запретить в эдите ввод всех знаков кроме 1 и 2.(Использовать маск эдит не советуют...).
← →
Song © (2002-06-13 10:38) [1]TEdit.onKeyDown
← →
QWest (2002-06-13 11:02) [2]Спасибо, полез разбираться...
← →
Виктор Щербаков © (2002-06-13 11:07) [3]Тогда уж
TEdit.OnChange
← →
Игорь Шевченко © (2002-06-13 11:47) [4]Если ввод с клавиатуры, то TEdit.OnKeyPress все-таки лучше...
← →
Song © (2002-06-13 12:56) [5]2Виктор Щербаков © (13.06.02 11:07)
onChange не подойдёт потому что Key в процедуру не передаётся.
2Игорь Шевченко © (13.06.02 11:47)
>>Если ввод с клавиатуры, то TEdit.OnKeyPress все-таки лучше...
Одинаково с onKeyDown
← →
Goblinus (2002-06-13 13:06) [6]
procedure TForm1.Memo1OnKeyPress(... key: char ...)
begin
if (key <> "1") or (key <> "2") then key:=#0;
end;
← →
Игорь Шевченко © (2002-06-13 13:08) [7]Song © (13.06.02 12:56)
> >>Если ввод с клавиатуры, то TEdit.OnKeyPress все-таки лучше...
>
> Одинаково с onKeyDown
Не всегда :-)
Страницы: 1 вся ветка
Текущий архив: 2002.06.24;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.019 c
