• Registered: 2018-03-04
  • Posts: 377

Topic: Подскажите, что нажать чтоб в combobox писались только цифры...

Подскажите, что нажать, чтоб в combobox писались только цифры...

Используется скрипт для combobox:
frmNew.ComboBox2.HideTextIfNotExists := False;

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Подскажите, что нажать чтоб в combobox писались только цифры...

procedure Form1_ComboBox1_OnKeyPress (Sender: TObject; var Key: Char);
begin
    if not (key in['0'..'9']) then key:=#0;
end;
Dmitry.

3 Reply by vit007 (edited by vit007 2020-03-15 16:39:59)

  • Registered: 2018-03-04
  • Posts: 377

Re: Подскажите, что нажать чтоб в combobox писались только цифры...

Что-то backspace не работает, а del работает....
Можно, что-то сделать...

4 Reply by vovka3003 (edited by vovka3003 2023-09-15 14:45:36)

  • From: Белгород
  • Registered: 2018-12-03
  • Posts: 657

Re: Подскажите, что нажать чтоб в combobox писались только цифры...

['0'..'9',#8]
Системы безопасности в Белгороде

vovka3003's Website