Серый форум — AHK: Поиск в буфере обмена по нескольким регекспам

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T19:56:26Z

serzh82saratov
Пока писал-отправлял последний пост пришло ваше сообщение. На мониторе в Notepade++ в двух областях экрана были окрыты оба скрипта. Таскал оттуда-сюда регекспы для теста и по-видимому натаскал лишнего.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T19:42:55Z

Да уж. Смешались кони, люди… Тысяча извинений. И огромное спасибо за долготерпение и отзывчивость. Всего доброго!
Пора, наверное, спать.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T19:33:18Z

Так не работало, и решили от себя добавить?


str := ".1233cdABCD123"
oPatterns := [

	, ["r1_Прописные буквы", "AB"]
;	, ["r2_строчные буквы", "cd", "i"]
;	, ["r3_Точки", "\."]
	, ["r4_Числа", "\d+"]]
 
for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")

MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T19:24:33Z

Опять ничего не понял. Ощущение что есть проблемы, но я о них сам должен догадаться.
Это откуда?


	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	patterns .= "((*:" k ")" v ")|"

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T19:17:21Z

Почему-то решил, что это фича такая.
Проверил ещё раз. Неправильно указал характер ошибки. При закомментировании одного из регекспов сработало не корректно. В сообщении были только номер шаблона и позиция. Комментарий и строка — пусто. Недостаточно тщательно проверил и наверное сделал неправильные выводы. Причина, кажется, в том, что в моем случае осталось всего два рабочих регекспа:

str := ".1233cdABCD123"
oPatterns := [

	, ["r1_Прописные буквы", "AB"]
;	, ["r2_строчные буквы", "cd", "i"]
;	, ["r3_Точки", "\."]
	, ["r4_Числа", "\d+"]]

for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	patterns .= "((*:" k ")" v ")|"
	RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")
MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Каюсь.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T18:40:06Z

Скорее последнее.
Почему нельзя сразу сказать об этом, и привести скриншот ошибки?
Или код который не работает.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T18:32:17Z

Я попробовал добавить в "Opatterns" из 18-го поста ещё регулярных выражений, скрипт заругался. Очевидно, нужно править ещё и "patterns". В случае кода из 17-го, скрипт сразу стал искать новые совпадения без каких либо правок в "patterns". Поэтому я и предпочел код из 17-го. Или я по своей дремучести что-то не понял?

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T17:49:04Z

Ничего не понял из вашего ответа, но к «А-ЯЁ» вписать по моему проще "i", чего вы и хотели добиться, а сейчас вдруг перехотели.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T17:45:17Z

serzh82saratov
Ну, я как-то так и подумал. Но надежда теплилась… Для меня предпочтительнее все-же при отладке и наполнении регекспами не править "patterns"и не путаться там при большом количестве регулярок. Проще лишний раз «А-ЯЁ» вписать. Огромное вам спасибо!

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T17:13:13Z

Так вы зачем из 17 код берёте, если про ключи (Опции) я только в 18 упоминаю.


oPatterns := [
	, ["r2_Прописные буквы", "AB"]
	, ["r1_строчные буквы", "cd", "i"]
	, ["r3_Числа", "\d+"]]

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T16:13:11Z

serzh82saratov пишет:

oPatterns := {"r1`nстрочные буквы": "cd"
			, "r2`nПрописные буквы":"ab"
			, "r3`nЧисла": "\d+"}

Это оно! Теперь можно и задокументировать ставшие ненужными, и добавить новые регекспы без необходимости править "patterns".
Только не смог разобраться как к этому коду приделать ключи.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T13:25:22Z

Опции можно добавить в третьем параметре шаблона.


str := "CDcd1233cdABCD123"

oPatterns := [
	, ["r2_Прописные буквы", "AB"]
	, ["r1_строчные буквы", "cd", "i"]
	, ["r3_Числа", "\d+"]]

for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")

MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T13:12:02Z

stokber пишет:

перелицевал вот таким образом

Тогда уж так:


str := "CDcd1233cdABCD123"

oPatterns := {"r1`nстрочные буквы": "cd"
			, "r2`nПрописные буквы":"ab"
			, "r3`nЧисла": "\d+"}

for k, v in oPatterns
	patterns .= "((*:" k ")" v ")|"
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)

MsgBox, % "шаблон: " Match.Mark "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-05-02T13:01:45Z

Спасибо! Для себя перелицевал вот таким образом:

str := "CDcd1233cdABCD123"
r1 := "(*:r1#строчные буквы)cd"
r2 := "(*:r2#Прописные буквы)AB"
r3 := "(*:r3#Числа)\d+"
oPatterns := [r1, r2, r3]
for k, v in oPatterns
	patterns .= "(" v ")|"
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
loop,parse, % Match.Mark, #
	c%A_Index%:=A_LoopField	
MsgBox, % "Шаблон: " c1 "`nКомментарий: " c2 "`nПозиция: " Match.Pos "`nДлина: " Match.Len "`nСтрока: " Match.Value

И два вопроса не дают покоя.
1. Хотел исхитриться, хоть и не очень на это и надеялся, отдельным регекспам присвоить ключи регистронезависимости i). Пришел к выводу, что это невозможно. Или всё-таки?
2. И в связи с п.1 и не только… Изначально решил пойти путем создания одного большого регулярного выражения с альтернативами. Вопрос: существует ли в AHK возможность сделать шаблоны соответствия более независимыми друг от друга, чтобы они могли иметь свои ключи и пополнялись бы простым добавлением и исключались бы комментированием?

Re: AHK: Поиск в буфере обмена по нескольким регекспам

2020-04-30T06:15:50Z

teadrinker
Не знал про Mark. Можно ещё так обернуть, для удобства добавления, и выводить например сам шаблон если нужно.

str := "123abcd"

oPatterns := ["cd", "ab", "\d+"]

for k, v in oPatterns
	patterns .= "((*:" v ")" v ")|"
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)

MsgBox, % "шаблон: " Match.Mark "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value