Скачать: CL | DM;

Как вести в TEdit только цифры   Найти похожие ветки 

← →
Gawk ©   (2003-10-09 11:14) [0]

Здравствуй Уважаемый ALL.
Подскажите мне как в TEdit вводить только цифры.
Заранее благодарен

---

← →
Skier ©   (2003-10-09 11:15) [1]

стиль ES_NUMBER

---

← →
TUser ©   (2003-10-09 11:21) [2]

Можно использовать св-во MaskEdit. Или еще так

procedure OnKeyPress(var Key);
begin
if not key in ["0","1", и т.д., "9"] then key:="";
end;


---

← →
Gawk_   (2003-10-09 11:49) [3]

> стиль ES_NUMBER

Не подскажешь как работать со стилями если чесно я про них первый раз слышу.


> procedure OnKeyPress(var Key);
> begin
> if not key in ["0","1", и т.д., "9"] then key:="";
> end;

Выдаёт ошибку о несоответствии типов

---

← →
AlexSV ©   (2003-10-09 11:55) [4]

А так
if not key in ["0".."9"] then key:=#0;

---

← →
-=[SDA]=- ©   (2003-10-09 11:55) [5]

На OnKeyPress я писал так:

if not(Key in ["0".."9", Chr(VK_BACK)]) then Key := #0;

---

← →
TUser ©   (2003-10-09 12:00) [6]

Со стилями? В смысле, что писать в MaskEdit. Если надо, чтобы вводились только цифры - то в IDE есть специальный редактор, вызывается из Object Inspector"а. Там все интуитивно-понятно. Ну и в хелпе что-то есть. Maskedit, собственно, записывается, как regular expretion в каком-нибудь перле или JavaScript, почти по том же правилам.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c