Menu, Tray, NoStandard
Menu, Tray, Icon, InWork.ico
Menu, Tray, Tip, InWork
Menu, Tray, Add, &Pause - On, Action
Menu, Tray, Add
Menu, Tray, Add, &Exit, ExitScript

Loop
{
   ToolTip, % A_Hour ":"A_Min "."A_Sec
   Sleep, 150
}
Return

Action:
   Menu, Tray, Tip, % (IsPaused:=!IsPaused) ? "OnPause":"InWork"
   Menu, Tray, Icon,  % IsPaused ? "Pause.ico":"InWork.ico",, 1
   Menu, Tray, Rename, % "&Pause - O"(!IsPaused ? "ff":"n")
                     , % "&Pause - O"(!IsPaused ? "n":"ff")
   ToolTip
   Pause
   Return

ExitScript:
   ExitApp

...
Menu, Tray, Icon, shell32.dll, % IsPaused ? 28:44, 1
...

Как изменить эту строку чтобы срабатывала смена иконки при прямом указании пути?
допустим пути короткие:
InWork.ico
и
Pause.ico
Спасибо за помощь!

...Никаких экстрасенсорных возможностей у меня нет просто я стараюсь внимательно читать то, что люди пишут...

Если бы ты внимательно читал, то наверняка заметил бы, что человек написал положительный отзыв после моего сообщения, то есть с его ЛКМ все в порядке.
К тому же, если бы ты читал ещё более внимательно, то заметил бы, что писал он с работы, а поправить собирался из дома. Если бы у него не хватило ума закрыть скрипт через контекстное меню в трее (где ЛКМ прекрасно работает) или через диспетчер задач, то вечером наверняка и заголовок его темы был бы поправлен, и новый пост по поводу неработающей ЛКМ появился бы. Скорее всего, человек получил, что хотел, на этом его активность иссякла.

   В общем, считаю, что наш диалог неконструктивен, можешь оставаться при своем мненинии, общение на этом заканчиваю. А тебе желаю и впредь оставаться таким же внимательным.

Это всё очень муторно.

Отнюдь. Это просто пример, того как можно использовать подобный подход со сменой иконок из контекстного меню скрипта.

Ну, как бы этот цикл с  информацией был просто для отображения действий связанных с командой Pause.

Menu, Tray, NoStandard
Menu, Tray, Icon, shell32.dll, 44
Menu, Tray, Tip, InWork
Menu, Tray, Add, &Pause - On, Action
Menu, Tray, Add
Menu, Tray, Add, &Exit, ExitScript

Loop
{
   ToolTip, % A_Hour ":"A_Min "."A_Sec
   Sleep, 250
}
Return

Action:
   Menu, Tray, Tip, % (IsPaused:=!IsPaused) ? "OnPause":"InWork"
   Menu, Tray, Icon, shell32.dll, % IsPaused ? 28:44, 1
   Menu, Tray, Rename, % "&Pause - O"(!IsPaused ? "ff":"n")
                     , % "&Pause - O"(!IsPaused ? "n":"ff")
   ToolTip
   Pause
   Return

ExitScript:
   ExitApp

Это всё очень муторно. Но как говорится, везде надо искать плюсы
Часы пришлись очень по душе. Спасибо.
Написал даже скриптик под них.

i:=0
 
Loop
{
   if(i=1)
   {
   ToolTip, % A_Hour ":"A_Min "."A_Sec
   Sleep, 250
   }
   if(i=0)
   {
   ToolTip
   Sleep, 250
   }   
}
Return


Esc::pause            ;замораживает часы
F1:: gosub, FF1     ;включает часы
F2:: gosub, FF2     ;выключает часы

FF1:
i:=1
Return
FF2:
i:=0
Return

Очень удобно для видео-скринов использовать

Никаких экстрасенсорных возможностей у меня нет просто я стараюсь внимательно читать то, что люди пишут

и если ты не заметил, там написано "После", а не "Вместо".
Я тебе просто написал нормально, чтоб ты исправил немного и всё, а ты начинаешь наезжать на меня.
Я бы не хотел оказаться на месте того парня. Может поэтому он и не смог зайти, чтоб исправить название темы, что у него не работает левая кнопка мыши.

P.S. Админы и модеры - сорри за оффтоп.

P.S. Если хочешь, чтоб отвечали на твои личные сообщения через форум, будь добр, включи такую возможность в настройках.

Menu, Tray, NoStandard
Menu, Tray, Icon, shell32.dll, 44
Menu, Tray, Tip, InWork
Menu, Tray, Add, &Pause - On, Action
Menu, Tray, Add
Menu, Tray, Add, &Exit, ExitScript

Loop
{
   ToolTip, % A_Hour ":"A_Min "."A_Sec
   Sleep, 250
}
Return

Action:
   Menu, Tray, Tip, % (IsPaused:=!IsPaused) ? "OnPause":"InWork"
   Menu, Tray, Icon, shell32.dll, % IsPaused ? 28:44, 1
   Menu, Tray, Rename, % "&Pause - O"(!IsPaused ? "ff":"n")
                     , % "&Pause - O"(!IsPaused ? "n":"ff")
   ToolTip
   Pause
   Return

ExitScript:
   ExitApp

Но срабатывает только если ставить на паузу с горячей клавиши.
и если поставить паузу вручную, а потом продолжить пользоваться горячими кнопками, иконки меняются местами.

Можно стандартное меню в трее заменить на своё, которое будет работать, используя указанный алгоритм.

При компиляции иконку можно задать.

Спасибо, разобрался. Я всегда компилировал с контекстного меню файла, где всегда стандартная иконка.

[AHK_L] fincs' scripted Ahk2Exe rewrite (with GUI) - r3
github

Reshacker

спасибо, но я по нерусски не понимаю

У меня так получилось:

Menu, Tray, Icon, Shell32.dll, 44

F10:: Pause, % Freeze(1)
F11:: Suspend, % Freeze(0)
   
Freeze(var)
{
   static
   if var
      Menu, Tray, Icon, Shell32.dll, % (i := !i) ? 28 : 44, 1
   Else
      Menu, Tray, Icon, Shell32.dll, % (k := !k) ? 45 : i ? 28 : 44, 1
}

При компиляции иконку можно задать.

Сразу не разобрался как, но работает.
Но срабатывает только если ставить на паузу с горячей клавиши.
и если поставить паузу вручную, а потом продолжить пользоваться горячими кнопками, иконки меняются местами.

P.S. Но из этого примера я понял, что можно менять иконку самого скрипта в трее в зависимости от того, что он делает.

Menu, Tray, Icon, Shell32.dll, 44

F10::
Menu, Tray, Icon, Shell32.dll, 33
Send, Вася Пупкин
Menu, Tray, Icon, Shell32.dll, 44
Return

F11::
Menu, Tray, Icon, Shell32.dll, 22
Send, Петя Васечкин
Menu, Tray, Icon, Shell32.dll, 44
Return

Reshacker

Menu, Tray, Icon, Shell32.dll, 44

F10:: Pause, % Freeze(1)
F11:: Suspend, % Freeze(0)
   
Freeze(var)
{
   static
   if var
      Menu, Tray, Icon, Shell32.dll, % (i := !i) ? 28 : 44, 1
   Else
      Menu, Tray, Icon, Shell32.dll, % (k := !k) ? 45 : i ? 28 : 44, 1
}

При компиляции иконку можно задать.