Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Здравствуйте. Подскажите, как реализовать при помоши AHK:
1. Имеется документ (111.txt) с набором фраз (20 - 30 шт.)
2. Нужно при копировании текста (фразы) в буфер из любой программы искать его в 111.txt и подавать эвуковой сигнал, если таковой найден.
Спасибо.
RegExMatch. Переменная, содержащая буфер обмена называется Clipboard.
Пример можно?
Примеры в справке. Там есть все материалы, для достижения вашей цели.
По RegExMatch есть перевод в соответствующей ветке форума. Изменения в буфере отлавливаются OnClipboardChange.
Не под силу оказалось мне решить эту задачу. Посему прошу поделиться хотя бы примерным наброском данного AHK.
Ну что конкретно вам не удалось? Вы справку читали?
Решение проблемы с кодировкой русского текста в буфер обмена найдите сами.
#Persistent
return
OnClipboardChange:
if (A_EventInfo == 1)
{
FileRead, temp_text, 1111.txt
if temp_text contains % ClipBoard
{
SoundBeep
}
temp_text := ""
}
return
Phoenixxx_Czar, зачем здесь A_EventInfo?
Зачем каждый раз считывать текстовый файл?
Contains здесь явно неверный оператор.
Не соглашусь только с считыванием файла каждый раз: нам же не известно сколько времени пройдет от первого копирования текста до второго, третьего и т.д. Может там уже файлик 100 раз переписался.
Вроде так можно искать совпадения через RegEx:
coat =
(
other
is
red
)
Output := RegExMatch(coat, "\b" . clipboard . "\b")
if Output != 0
MsgBox нашло совпадение
Мимо.
clipboard := "стол"
coat =
(
стол
is
red
)
Output := RegExMatch(coat, "\b" . clipboard . "\b")
if Output != 0
MsgBox нашло совпадениеНу и в задани требуется искать совпадение фраз, а не слов во фразах.
Ну, у меня ищет фразы
clipboard := "Is other off"
coat =
(
her
other
Is other off
)
Output := RegExMatch(coat, "\b" . clipboard . "\b")
if Output != 0
MsgBox совпадение найдено
, а про русские буквы не знал. Так, такой вариант лучше, чем ничего же.
У вас ищет слова в фразах.
И почему вы не используете отступы?
clipboard := "other"
coat =
(
her
other
Is other off
)
Output := RegExMatch(coat, "\b" . clipboard . "\b")
if Output != 0
MsgBox совпадение найдено
И почему вы не используете отступы?
Какие отступы? А слова, конечно, ищет, чего они не должны искаться?
Какие отступы?
https://ru.wikipedia.org/wiki/%D0%9E%D1 … %B8%D0%B5)
А слова, конечно, ищет, чего они не должны искаться?
Вы на самом деле не понимаете разницу или троллите?
Ну, я не хотел писать тэсу, чтобы он шел читать справку, а показать хоть какой-нибудь пример.
Самый простой способ разделять фразы каким-нибудь невстречающимся в них знаком и искать через InStr.
Спасибо всем, кто помогает. У меня пока не получается сделать то, что нужно. Попробую конкретизировать задачу. В электронных письмах имеются несколько десятков позиций. Некоторые ненужные. При копировании одной из позиций (в буфер), нужно автоматически сравнить с "чёрным списком" и подать некий знак, для понимания её (позиции) нужности-ненужности. Список состоит из 30-60 фраз. Изменяется редко. Не обязательно документ для сравнения должен быть в .txt. Можно поместить набор фраз в AHK.
Справка перечитана. Выкладывать результаты потуг стеснительно.
txt = |фраза1|фраза2|фраза3|
clipboard = фраза1
If InStr(txt, "|" Clipboard "|")
msgbox найдено
p.polena, вы так и не ответили. На каком этапе вы остановились? Я не помогу вам, если вы не будете проявлять активность в обучении.
В электронных письмах имеются несколько десятков позиций
...
30-60 фраз
Фразы разделены переносом строки что ли? Думаю, в Ваших планах не было 30-60 раз нажимать Ctr+C, Ctrl+V.
ypppu, копирую одну фразу-позицию. Автоматически сравнивается со списком. Если совпадение, то пропускаю и перехожу к следующей фразе. Не совпадение. Этот позицию инвойса в работу.
Чем отделены друг от друга фразы? AutoHotkey во многих случаях позволяет избавиться от рутины с копированием.
Так что вы в результате хотите получить - список фраз, которых нету в чёрном списке?
ypppu, как письмо отформатировано. Не от меня зависит. В FF при выделении текста у меня автокопирование. По списку последовательно каждую фразу-позицию проверяю на актуальность. Часто бывают ненужные повторы выполненных заказов.
Malcev, в результате должно быть так:
при выделении (копировании в буфер) любой фразы, которая есть в подготовленном списке (файл .txt, либо можно поместить в AHK), подаётся сигнал при её (фразы) наличии в оном.
Тогда вам уже накидали примеров, чтобы сделать задуманное.
txt = |а|б|в|
clipboard := "other"
coat =
(
her
other
Is other off
)
If InStr(txt, "|" Clipboard "|")
msgbox найденоСовсем не туда?
Нет. Читайте справку.
txt = |а|б|в|
loop
{
sleep,10
If InStr(txt, "|" Clipboard "|")
tooltip найдено
else
tooltip
}Всем спасибо. Задача решена.
Alectric
Спасибо за полезный код. Но столкнулся с проблемой: если в переменой txt занесено примерно 752 фразы (16151 символов), то скрипт ещё успешно работает и выполняет свою задачу.
Если же я пытаюсь добавить ещё больше фраз, то скрипт матерится и не запускается (Error: This line does not contain a recognized action). Подскажите пожалуйста, как обойти этот лимит.
vlad1986
Наверно проблема в том, что максимальная длина строки в скрипте может быть 16383 символа. Чтобы обойти это, можно разбить заполнение переменной на несколько этапов, в каждом из которых будет добавляться меньшее количество символов, чем 16383:
var := "one,"
var .= "two"
MsgBox, % varСтраницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
