Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

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

lightix © (2002-03-06 13:31:00)
Подзабыл, какая функция типа IsDigit или IsAlpha позволяет узнать тип данных?

Андрей Сенченко (2002-03-06 16:59:00) [1]
Потому и лейблы простого синего цвета :)
Но именно в таких "спорах" и учишься писать правильно.

Виктор Щербаков (2002-03-06 14:18:00) [2]
Не хватает порой лаконичности :)

Alx2 (2002-03-06 14:16:00) [3]
>Юрий Зотов © (06.03.02 14:12)
Уел-таки :))

Юрий Зотов (2002-03-06 14:12:00) [4]
Немного короче такие вещи пишутся:

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

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

:o)

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

> Как проверить тип данных, введенный в 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:00) [6]
if ch in ["0".."9"] then ch - цифра
:)

gek (2002-03-06 13:53:00) [7]
IsDigit и IsAlpha это в С
тут видимо надо проверять на вводе
цифра, буква или еще что и отбрасывать ненужное

Наверх

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