0

Здравствуйте, нужна помощь в следующем: нужно ограничить ввод в Edit, возможность вводить только положительные, отрицательные числа и числа с запятой т.е.(1, -1, 0.1) Заранее всем спасибо

1
  • Если MaskEdit beluch.ru/progr/100comp/3_3_3.htm не помогает, то возможно при помощи регулярок это можно сделать.
    – Smash
    15 фев 2014 в 21:37

2 ответа 2

1

Используем обработчик OnKeyPress:

procedure TMainForm.EditKeyPress(Sender: TObject; var Key: Char);
    begin
      // разрешить ввод цифр, запятой, знака '-' и backspace
      if not (key in ['0'.. '9', #8, #45, #44]) then
        // в противном случае не вводить ничего
        key:= #0;
    end;
0

У компонента TEdit есть событие OnChange, которое вызывается при изменении текста. В обработчике этого события можно проверять какой введен текст и, например, удалять символы, которые не нужны.

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.