[mkung]

Прошу прощения - ступил! Почему-то решил, что wcmatch работает как vl-string-search...
Не могу понять причину несрабатывания WCMATCH.
Вот два кода для примера:

Код:

[Выделить все]

(setq pc3 "t:\\autocad\\plotters\\pc3;T:\\AutoCAD\\Plotters\\PC3")
(if (not (wcmatch pc3 "T:\\AutoCAD\\Plotters\\PC3"))
    (princ "\n Путь T:\\AutoCAD\\Plotters\\PC3 не найден!")
    (princ "\n Путь T:\\AutoCAD\\Plotters\\PC3 найден!")
)

Пишет - путь не найден!

Код:

[Выделить все]

(setq pc3 "T:\\AutoCAD\\Plotters\\PC3")
(if (not (wcmatch pc3 "T:\\AutoCAD\\Plotters\\PC3"))
    (princ "\n Путь T:\\AutoCAD\\Plotters\\PC3 не найден!")
    (princ "\n Путь T:\\AutoCAD\\Plotters\\PC3 найден!")
)

Пишет - путь найден!
В чем тут дело? Ведь образец есть и в той и в другой строке!

[Кулик Алексей aka kpblc]

Приводи строки к одинаковому регистру (см. strcase) и только потом сравнивай:
"a" <> "A"
"A" = "A"

[Do$]

В WCMATCH шаблоны разделяются не точкой с запятой а просто запятой: "t:\\autocad\\plotters\\pc3,T:\\AutoCAD\\Plotters\\PC3".

[Кулик Алексей aka kpblc]

И вообще-то еще момент (насколько я помню): сначала сравниваемая строка, а только потом маска.

Код:

[Выделить все]

 (setq pc3  "t:\\autocad\\plotters\\pc3,T:\\AutoCAD\\Plotters\\PC3"
      path "T:\\AutoCAD\\Plotters\\PC3"
      ) ;_ end of setq
(princ (strcat "\n Путь \""
               path
               "\""
               (if (wcmatch (strcase path) (strcase pc3))
                 ""
                 " не"
                 ) ;_ end of if
               " найден!"
               ) ;_ end of strcat
       ) ;_ end of princ

[tujn08]

Приветствую!
мне тоже нужен совет..

Код:

[Выделить все]

 
Команда: (wcmatch "qweqweasdasd" "qweqwe,*")
T
Команда: (wcmatch "qweqwe asdasd" "qweqwe,*")
T
Команда: (wcmatch "qweqwe asdasd" "qweqwed,*")
T
Команда: (wcmatch "qweqwe asdasd" "qweqwedsdf,*")
T

почему последние два сравнения Т ?

[Кулик Алексей aka kpblc]

Во всех строках: не отвечает первой части маски, но отвечает второй. И в чем собственно вопрос?

[tujn08]

Сообщение от Кулик Алексей aka kpblc не отвечает первой части маски, но отвечает второй.

в книге неточно расписано об этом.
Т.е. Т, если любое из условий выполняется?
Я нужен результат, если совпадает первая часть, а вторая нет (т.е. nil в итоге).
Ладно, понятно, покумекаю над масками. Думаю тогда запятую убрать просто?

[Кулик Алексей aka kpblc]

(wcmatch "qweqweasdasd" "qweqwe,*") можно преобразовать как (or (wcmatch "qweqweasdasd" "qweqwe") (wcmatch "qweqweasdasd" "*")), т.е. (or nil t). Естественно, возвращается t.
(wcmatch "qweqweasdasd" "qweqwe*") даст t.
Твою задачу не понял. Ты чего добиваешься-то?

[tujn08]

Спасибо! Я разобрался уже- как ты написал.
Сравнивал значение атрибута "кабель 100м" и значение в экселе "кабель 50м". У меня как всегда все сложно и я сравниваю для начала столбец:
"кабель 100м" и значение в экселе "кабель ", а потом сравниваю "100м" и "50м". Т.е. порядок значений атрибутов не будет соответствовать порядку значений в экселе.

----- добавлено через 57 сек. -----
вместо "кабель " может быть "металлорукав "

[Кулик Алексей aka kpblc]

(wcmatch "кабель 100м" "каб* ##м")