Программный ввод в MaskEdit

22.09.2011, 02:04. Показов 1673. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Доброго Времени Суток! В моей программе есть момент когда пользователь должен ввести 4-значный пин-код, где незанятые цифрами позиции обозначаются "*". Для этого я использую MaskEdit и кнопки, имитирующие нажатия клавиш 1,2,3,4,5,6,7,8,9,0,<--.

Но ввод через имитирующие кнопки, по какой-то причине, возможен строго слева-направо, иначе при нажатии какой-либо из кнопок ввода вылетает ошибка "Invalid input value". Хотя при вводе через клавиатуру всё работает нормально при любом порядке ввода. Проблема в том, что мышкой можно менять курсор ввода и вписывать символы в произвольном порядке, и из-за этого есть возможность легко нарваться на ошибку.

Три варианта ввода данных, которые я перепробовал:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//edInNum - строка ввода типа MaskEdit
//bIn1 - кнопка имитирующая клавишу 1
//bin2 - кнопка имитирующая клавишу 2
//bin3 - кнопка имитирующая клавишу 3
//fmMetro - главная форма программы
 
procedure TfmMetro.bIn1Click(Sender: TObject);
begin
keybd_event(Ord('1'), 0, 0, 0);
keybd_event(Ord('1'), 0, KEYEVENTF_KEYUP, 0);
end;
 
procedure TfmMetro.bIn2Click(Sender: TObject);
begin
edinnum.Perform(WM_CHAR, Ord('2'), 0);
end;
 
procedure TfmMetro.bIn3Click(Sender: TObject);
begin
SendMessage(edInNum.Handle, WM_CHAR, ord('3'), 0);
end;

Существует ли способ избежать такой странности с вводом? Возможно ли как-либо закрыть MaskEdit от действий мышки или использовать вид ввода, где нет такой странной ошибки?

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

22.09.2011, 02:04

Ответы с готовыми решениями:

Программный ввод даты
Здравствуйте! Подскажите, пожалуйста! Хочу добавить данные в таблицу, но не знаю как добавить данные типа date. Вот код: ...

Ввод Hex-символов через MaskEdit
Следующая конструкция позволяет вводить Hex символы вида 0F FE A0... в поле MaskEdit: procedure TForm3.MaskEdit1Change(Sender:...

Как контролировать правильный ввод даты в maskedit?
Как мне контролировать правильный ввод даты в maskedit? Ставлю маску следующего формата(!90/90/00;1;_), водится дата 99.99.9999 но ведь...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

22.09.2011, 02:04

Помогаю со студенческими работами здесь

MaskEdit: Как проверить на пустоту номер телефона, а также проверить ввод всех его цифр?
Туплю с утра... есть MaskEdit с маской !\(000\)000-0000;1;_ ..телефона. Как его проверить на пустоту, чтобы все цифры были введены? ...

Проверка MaskEdit на ввод полной даты
Добрый день! Вопрос по поводу проверки введена ли полная дата в MaskEdit: Есть MaskEdit с маской на дату MaskEdit1->EditMask =...

Программный ввод из файла
Нужно программно(без участия пользователя) открыть файл с расширением .dat и извлечь из него данные по следующей схеме: в первой строке...

Программный ввод на основании
Платформа - 7.7 Простите за, наверное, ламерский вопрос. Есть документ, на основании его можно ввести несколько видов других документов. ...

[Concurrency] Объяснить программный ввод Enter
Есть пример, объясняющий моделирование ввода Enter через 3 секунд после старта программы, для того, чтобы завершить выполнение потока ...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	Программный отбор значений справочника Maks 21.03.2026 Установка программного отбора значений справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью

Наверх