| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Проверить значение первого символа

Страницы:   < 1 2 >

HumanToString ©   (2006-11-05 10:19:00) 

Из элемента TEdit необходимо проверить первый символ на принадлежность к цифре. Т.е. проверить является ли первый символ цифрой. Как это лучше сделать?

1.
 if (Edit1.Text[1] in ['0'..'9']) then
   ShowMessage('dd');

2.
 if (StrToIntDef(Edit1.Text, 0) <> 0) then
   ShowMessage('dd2');

Или и то и то, совсем не то?

---

HumanToString   (2006-11-05 11:45:00) [21]

Тогда вопрос ещё один: а как лучше проверять наличие текста:
1.
if Edit.Text <> ''
2.
if Length(Edit1.Text) <> 0

---

HumanToString   (2006-11-05 11:02:00) [22]

> - 0 не является цифрой? Я не помню...


Спасибо. Что-то я не сообразил про 0.

---

Virgo_Style   (2006-11-05 10:39:00) [23]

по (2) :
- 0 не является цифрой? Я не помню...
- пропущено Edit.Text [1]

по обоим - проверка Edit1.Text>''.

imho, следует использовать (1).

---

HumanToString   (2006-11-05 10:21:00) [24]

Нет, всё правильно, <>. Что-то  совсем с головой плохо...

---

HumanToString   (2006-11-05 10:20:00) [25]

Т.е. во втором случае = 0,  не <> 0.

---

Страницы:   < 1 2 >

Наверх