Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.21;
Скачать: CL | DM;

Вниз

Как проверить тип данных, введенный в TEdit?   Найти похожие ветки 

 
lightix ©   (2002-03-06 13:31) [0]

Подзабыл, какая функция типа IsDigit или IsAlpha позволяет узнать тип данных?


 
gek   (2002-03-06 13:53) [1]

IsDigit и IsAlpha это в С
тут видимо надо проверять на вводе
цифра, буква или еще что и отбрасывать ненужное


 
Виктор Щербаков ©   (2002-03-06 13:59) [2]


> Как проверить тип данных, введенный в TEdit?

В TEdit вводится строка, можешь не проверять.
Но, как я понял, нужно проверить на возможность преобразования этой строки к каким-то стандартным типам. Если так, то к каким именно?

А если нужны IsDigit и IsAlpha, то элементарно реализуются:
function IsDigit(Ch: Char): boolean;
begin
if Ch in ["0".."9"] then Result := true else Result := false;
end;

function IsAlpha(Ch: Char): boolean;
begin
if Ch in ["a".."z", "A".."Z", "_"] then Result := true else Result := false;
end;


 
Alx2 ©   (2002-03-06 13:59) [3]

if ch in ["0".."9"] then ch - цифра
:)


 
Юрий Зотов ©   (2002-03-06 14:12) [4]

Немного короче такие вещи пишутся:

Result := Ch in ["0".."9"]

И никаких if ... then ... else ...

:o)


 
Alx2 ©   (2002-03-06 14:16) [5]

>Юрий Зотов © (06.03.02 14:12)
Уел-таки :))


 
Виктор Щербаков ©   (2002-03-06 14:18) [6]

Не хватает порой лаконичности :)


 
Андрей Сенченко ©   (2002-03-06 16:59) [7]

Потому и лейблы простого синего цвета :)
Но именно в таких "спорах" и учишься писать правильно.



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

Текущий архив: 2002.03.21;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.009 c
3-66750
Sys
2002-02-20 21:42
2002.03.21
Помогите сделать первые шаги в Intrbase


1-66915
Eraser
2002-03-06 10:26
2002.03.21
поместить объект в TList


14-66965
PVOzerski
2002-02-06 16:43
2002.03.21
Мне тут NT 4 подарочек преподнесла... Как побороть?


4-67047
Cobalt
2002-01-22 19:14
2002.03.21
Файл, отображаемый в память


3-66798
Demon ltd
2002-02-23 23:44
2002.03.21
Сортировка в базе