Orion9

|
Posted: Thu May 28, 2026 13:41 Post subject: |
|
|
| FallenAngel wrote: | | Спасибо, буду наблюдать что да как. |
Надеюсь, получится отловить. Если все переменные не нужны, а нужна только переменная %Path%, то вместо GetState("envvars") можно использовать GetEnv("path"). Возможно, так будет проще сравнить. Теперь в буфер попадает два снимка: %Path% при старте ТС + %Path% после появления проблемы.
 Hidden text | Code: | RunThread("CheckEnvState")
Func CheckEnvState()
Local interval = 10 # sec.
Local envname = ";" & COMMANDER_PATH & "\Utils"
#Local snap = GetState("envvars")
Local snap = GetEnv("path")
If Not StrPos(snap, envname) Then
MsgBox("Поток «CheckEnvState» не запущен." & auCRLF & auCRLF & _
"Путь не найден в окружении ;%COMMANDER_PATH%\Utils", "Autorun", 0+48)
Return
EndIf
While 1
Sleep(interval*1000)
#envs = GetState("envvars")
envs = GetEnv("path")
If Not StrPos(envs, envname) Then
MsgBox("Путь больше не доступен ;%COMMANDER_PATH%\Utils" & auCRLF & auCRLF & _
"Скопировать состояние переменных в буфер?", "Autorun", 4+48+4096)
If EXTENDED = 6 Then
ClipPut(snap & auCRLF & auCRLF & "-------------" & auCRLF & auCRLF & envs)
MsgBox("Состояние переменных скопировано в буфер", "Autorun", 0+64)
EndIf
Return
EndIf
WEnd
EndFunc |
| SergM2026 wrote: | | У меня такое бывало |
Это немного другая проблема, ранее она обсуждалась. Соответственно, самое простое решение избавится от этой проблемы — положить лицензию в корень ТС  |
|