Реакция скрипта на наличие определенного слова в буфере обмена

[perven1]

Версия AutoIt: 3.3.12.0

Описание:
Всем доброго дня.
Скажите - как сделать так, чтобы скрипт срабатывал на наличие в буфере обмена - определенного слова ?

То есть - скрипт запускается и висит в трее. Когда в буфере обмена - появляется текст, включающий слово "текст-3", то скрипт выдает сообщение о срабатывании.

Примечания:

 

[mr.Gbabak]

Local $aClip, $sCurClip = "текст-3"

While 1
    $aClip = ClipGet()
    If $aClip = $sCurClip Then
        MsgBox (0, '', 'Оповещение')
    EndIf
    Sleep(100)
WEnd

 

[Tempo]

perven1 [?]

текст, включающий слово "текст-3"

Global $sClip, $sCurClip, $sText = "текст-3"

While 1
	$sClip = ClipGet()
	If $sClip <> $sCurClip Then
		If StringInStr($sClip, $sText) Then ConsoleWrite("Текст найден" & @CRLF)
		$sCurClip = $sClip
	EndIf
	Sleep(250)
WEnd

 

[perven1]

Tempo, копирую текст содержащий данное слово - но ничего не происходит.
Скрипт просто висит в трее и никак не реагирует.

 

[Tempo]

perven1, скрипт запускаете из SciTE? Консоль смотрите?


Добавлено:

Сообщение автоматически объединено: 11 Июн 2018

Заменил на MsgBox

Global $sClip, $sCurClip, $sText = "текст-3"

While 1
    $sClip = ClipGet()
    If $sClip <> $sCurClip Then
        If StringInStr($sClip, $sText) Then MsgBox(0, "", "Текст найден")
        $sCurClip = $sClip
    EndIf
    Sleep(250)
WEnd

 

[perven1]

Tempo, теперь все работает.
Спасибо большое.