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

Edit   Найти похожие ветки 

← →
*Boba   (2004-06-20 17:10) [0]

Добрый день всем!
как реализовать следущую фишку?
Мне необходимо чтобы в стандартный Edit можно было бы вводить
токо числа а буквы и символы -,+,=, а также точка и запятая
вводить было нельзя. При этом чтобы работали еще клавиши Del
и Backspace.
Зарание благодарен за ответ.

---

← →
YurikGL ©   (2004-06-20 17:13) [1]

> *Boba   (20.06.04 17:10)  

MaskEdit?

---

← →
*Boba   (2004-06-20 17:15) [2]

Не это не подойдет необходимо с использованием Edit

---

← →
YurikGL ©   (2004-06-20 17:27) [3]

Тогда ручками отрабатывать событие onchange - удалять запрещенные символы каждый раз и все.

---

← →
*Boba   (2004-06-20 17:36) [4]

Прошу прощения за нескромный вопрос. А нет ли примера
или исходного кода?

---

← →
Palladin ©   (2004-06-20 17:36) [5]

Проще все позволить и проверять при подтверждении введенных данных.

---

← →
YurikGL ©   (2004-06-20 17:39) [6]

Что-то вроде
procedure TFormSborkiNastr.Edit2Change(Sender: TObject);
begin
for i:=1 to length(Edit2.Text) do
 if Edit2.Text in["-","+",...] then delete(Edit2.Text,i,1)

end;

---

← →
*Boba   (2004-06-20 17:40) [7]

To Palladin:
Cпасибо за вариант но в данном случаи он не подходит :)

---

← →
Palladin ©   (2004-06-20 17:49) [8]

Дело хозяйское...

---

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

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



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