|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.02.2007, 16:54 | #1 |
Пользователь
Регистрация: 19.11.2006
Сообщений: 42
|
как узнать что введено а Edit1 цифры или нет
как узнать что введено а Edit1 цифры или нет
знаю в Си есть функции IsDigit,IsAlpha, а в delphi? |
03.02.2007, 17:29 | #2 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
разделить на 1. есл не разделиться, то значит буквы. ))
|
03.02.2007, 18:03 | #3 |
Владимир М.
Участник клуба
Регистрация: 30.10.2006
Сообщений: 1,289
|
можно и так
только делить внутри try except end
Берегите друг друга!
|
03.02.2007, 23:32 | #4 |
Пользователь
Регистрация: 19.11.2006
Сообщений: 42
|
try StrToInt(a)/1 except k:=1; end;
выдает ошибку Statement expected, but expression of type "Extended" found |
04.02.2007, 00:32 | #5 |
Андрей
Форумчанин
Регистрация: 21.11.2006
Сообщений: 457
|
Готовая функция:
Код:
ICQ: 5311314
[SIGPIC][/SIGPIC] |
04.02.2007, 21:11 | #6 |
Пользователь
Регистрация: 08.01.2007
Сообщений: 41
|
Код:
|
05.02.2007, 06:47 | #7 | |
Владимир М.
Участник клуба
Регистрация: 30.10.2006
Сообщений: 1,289
|
Цитата:
это все-таки крайний способ, конечно
Берегите друг друга!
|
|
05.02.2007, 07:39 | #8 |
Пользователь
Регистрация: 08.01.2007
Сообщений: 41
|
try StrToInt(a)/1 except k:=1; end;
а вот эта инструкция вообще не допустима try somevar:=round(StrToInt(a)/1) except k:=1; end; вот эта ещё более мение |
05.02.2007, 10:05 | #9 |
Пользователь Подтвердите свой е-майл
Регистрация: 14.12.2006
Сообщений: 29
|
Есть процедура Val. Она определяет, что введено и возвращает значение в переменную соответствующего типа.
какой вопрос, такой ответ..
|
05.02.2007, 10:43 | #10 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
1. strtointdef
2. onkeypress
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как узнать в Edit1.Text у меня информация Integer | Shaitan63 | Общие вопросы Delphi | 11 | 29.01.2009 11:20 |
y=Edit1->Text ??? | m.a.x.i.m | Помощь студентам | 8 | 31.03.2008 11:29 |
как разместить в ячейку таблицы, то что введено в edit? | Ensoph | Общие вопросы Delphi | 9 | 17.09.2007 22:58 |
из edit1.text в stringgrid. | fluer | Общие вопросы Delphi | 8 | 25.04.2007 11:23 |