0 / 0 / 0
Регистрация: 30.03.2015
Сообщений: 131
|
|
1 | |
Delphi 7 калькулятор запрет ввода15.01.2016, 21:53. Показов 1713. Ответов 3
Метки нет (Все метки)
Привет, как в калькуляторе можно запретить ввод в edit двойного плюса '++' или '+*' и т.д. Вот код:
procedure TForm332.Label16Click(Sender: TObject); var s:string; formula:OleVariant; begin begin formula :=CreateOleObject('MSScriptControl.ScriptControl'); formula.Language :='VBScript'; s :=Form332.edit1.Text; Form332.Edit3.Text:=(formula.Eval(s)); end; end;
0
|
15.01.2016, 21:53 | |
Ответы с готовыми решениями:
3
Delphi 7 калькулятор запрет чисел 02; 03; 07; и т.д Как сделать запрет ввода у Edit в Delphi XE7 под андроид запрет ввода Запрет ввода StringGrid |
4912 / 2781 / 853
Регистрация: 04.10.2012
Сообщений: 10,121
|
|
15.01.2016, 22:11 | 2 |
1
|
Модератор
|
||||||||||||||||
15.01.2016, 22:16 | 3 | |||||||||||||||
Сообщение было отмечено artem_0108 как решение
Решение
Вот пример запрета ввода двойных знаков арифметических действий (++, -* и т.д.)
1. Объявляешь в классе формы
1
|
0 / 0 / 0
Регистрация: 30.03.2015
Сообщений: 131
|
|
16.01.2016, 00:09 [ТС] | 4 |
Спасибо большое, все работает.
Добавлено через 33 минуты Символы нельзя вводить подряд одинаковы, но и цифры я не могу ввести одинаковые подряд. Добавлено через 13 минут А нет, все исправилось.
0
|
16.01.2016, 00:09 | |
16.01.2016, 00:09 | |
Помогаю со студенческими работами здесь
4
Запрет ввода в Edit запрет ввода в едите TMemo - запрет ввода Запрет ввода в StringGrid Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |