Скачать: CL | DM;

Как можно проверить строку на наличие хотябы одной буквы?   Найти похожие ветки 

← →
Keplin Sergey   (2002-10-04 16:09) [0]

Есть две строки "delphi super" и "2424,20-24==2402" как
определить програмно что в первой строке есть буквы(причем неважно какого языка русского или английского) а во второй строке букв нет...
Помогите плиз!

---

← →
MBo ©   (2002-10-04 16:10) [1]

c помощью цикла, множеств букв и цифр, оператора IN

---

← →
karbo ©   (2002-10-04 16:30) [2]


Function Letter ( Const s : string ) : boolean;
var i: cardinal;
begin
result := false;
for i:=1 to length ( s ) do
if s[i] in ["a".."z","A".."Z","а".."я","А".."Я"]
then
begin
result := true; exit
end
end;

Сейчас заплачу...

---

← →
Keplin Sergey   (2002-10-04 19:11) [3]

спасибки!

---

← →
ksiusha   (2002-10-08 14:39) [4]

lastdelimiter

---

← →
REA   (2002-10-08 14:54) [5]

IsValidIdent тоже есть, но не совсем по теме

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c