Форум: "Основная";
Текущий архив: 2003.02.24;
Скачать: [xml.tar.bz2];

Вниз

mask   Найти похожие ветки 

← →
race1   (2003-02-13 16:07) [0]

есть маска и строчка, нужно проверить, совпадает ли строчка маске.

---

← →
Anatoly Podgoretsky   (2003-02-13 16:13) [1]

MatchesMask

---

← →
Романов Р.В.   (2003-02-13 16:28) [2]

function CheckMask(const str, mask: string): Boolean;
begin
Result := MessageBox(GetDesktopWindow, PChar(
"Эй, кто там около компьютера есть!"+#10#13+
"Посмотрите эта строка:"+#10#13+
str+#10#13+
"Соответствует этой маске:"+#10#13+
mask),
"ПАМАГИТЕ ЛЮДИ ДОБРЫЕ !!!", MB_YESNO + MB_ICONQUESTION) = IDYES;
end;

---

← →
race1   (2003-02-13 17:56) [3]

ну наконец-то! и главное - под носом было :)

---

← →
Chubais   (2003-02-13 18:02) [4]

> Романов Р.В. © (13.02.03 16:28)

класс!!

уважаю новизну подхода))

---

← →
Chubais   (2003-02-13 18:05) [5]

возьми например Delphi Fundamentals Library
или QStrings

там есть под названием *Match* или *Mask*

---

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

Форум: "Основная";
Текущий архив: 2003.02.24;
Скачать: [xml.tar.bz2];

Наверх

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