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

Вниз

Подскажите идею ...!!!   Найти похожие ветки 

 
koly01 ©   (2003-01-13 10:24) [0]

Привет Мастаки!

Есть комманды пришедшие от абонента
mod:userid="koly",psw="010101";
ее нужно проверить на орфографию по определенному шаблону, подскажите как сделать шаблон что бы с наименьшем кол-вом вермени проверить соответствие каманде.
Кроме этого нужно ее преобразовать в такую комманду после проверки:
moduserid:userid_name="koly",paswword="010101";

спасибо,
С Уважением, koly01


 
Думкин   (2003-01-13 10:31) [1]

Есть такой компонент - шаблоны как в Перле.
http://anso.da.ru/
http://anso.virtualave.net/


 
neXt ©   (2003-01-13 10:43) [2]

В Delphi это класс TRegExpr его можно добыть например с http://opengalaxy.metacom.ru/prog/parser.zip


 
neXt ©   (2003-01-13 10:43) [3]

>>Думкин -- я не ивдел Вашего ответа


 
neXt ©   (2003-01-13 10:47) [4]

само регулярное выражение может быть таким

mod:userid="\w+"\,psw="\w+";



 
koly01 ©   (2003-01-13 11:05) [5]

Извиняюсь но меня не поняли
Нужно проверить на соответсвие стандарту
что команда иммено Mod, что после нее идет двоеточие, после двоеточия нужно проверить на соответствие всех имен параметров(их значения проверять не надо), а после всех параметров должна идти ";" , далее все это берется и преобразовывается в др. комманду в дрю параметры но с темиже значениями параметров ...



 
neXt ©   (2003-01-13 11:51) [6]

регекспры ИМЕННО ДЛЯ ТАКИХ ЗАДАЧ И ПРИДУМАНЫ
даю пример

// например такой текст требует проверки
String MyText = "mod:userid="koly",psw="010101";";
...
var
RE: TRegExpr;
begin
RE := TRegExpr.Create;
try
{ это шаблон по которрому проверяется выражение.
\w+ - означают произвольный набор букв
\, - означает просто запятую}
RE.Expression := "mod:userid="\w+"\,psw="\w+";" ;
{Если в строке MyText найдено выражение удовлентворяющее шаблону RE.Expression то ДА! в противном случае НЕТ!}
If RE.Exec(MyText) then
ShowMessage("ДА!")
else
ShowMessage("НЕТ!");
finally
RE.Free;
end;
end;



 
neXt ©   (2003-01-13 11:58) [7]

для замены текста там тоже есть хорошие методы Split, Replace и пр. Компонент хорошо документирован, рекомендую ознакомиться комментариями к нему.


 
koly01 ©   (2003-01-13 12:14) [8]

СПАСИБО!!!!



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

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

Наверх




Память: 0.48 MB
Время: 0.013 c
1-72360
April
2003-01-12 11:27
2003.01.23
Как с формы удалить все компоненты, кроме как дестроить каждую?


6-72431
Konsul
2002-11-24 15:22
2003.01.23
Dial-up


4-72595
gunner
2002-12-06 11:23
2003.01.23
Проблема вызова функции из сервиса соединения с БД из DLL


1-72198
Dmitriy_R
2003-01-14 10:35
2003.01.23
Программа без формы + Memo


7-72548
DD
2002-11-05 00:47
2003.01.23
Как не через fdisk, а програмно установить активный раздел на HDD