Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Autorun 
Author Message
Orion9



PostPosted: Fri Oct 03, 2025 00:25    Post subject: Reply with quote

A55555
Проблему с зависанием удалось воспроизвести. Один раз у меня действительно зависло на поиске Blu-Ray, но больше, сколько бы я не пытался повторить, этого не произошло. Пока не ясно, в чем причина, но было похоже, что Everything просто перестала отвечать на запросы. Вернее, она не ответила на последний запрос, в результате все так и зависло к концу операции. Это навело меня на мысль, что нужно сделать проценты поиска и какую-то информацию по памяти (хоть какую-то, вдруг она там очень сильно отжирается). Замените эти два блока.

Code:
# локальные переменные
Local T1 = GetUptime(), T2 = T1, T3, bSpeed = 0, bDbg = 1, nRes = 0
Local bName = Not b_Shift, bSize = Not b_CTRL, sSize, sMode, sMem, sDbg
Local j, nCount, sRes, nError, sList, sDirs, aQuery = List(), aCount = List()


Code:
# размер файла
If bSize Then
   sSize = DllCall(sLibName & "\TorrentGet", "handle", hHandle, "wstr", "FileSize", "int", j, "wstr")
EndIf

sDbg = Round(j/(nCount-1)*100,0) & '% - '
If bDbg Then
   nRes += StrLen(sRes) + 8
   sMem = StrLen(sList) + StrLen(sDirs) + nRes
   sDbg &= SizeFormat(sMem*2, 1, 'G', 2) &  ' - '       
EndIf

# меньше сообщений окну прогресса
If bSpeed Then
   T3 = GetUptime()
   If Round(T3 - T2, 0) > 250 Then
      WinSetText(sDbg & sRes, h_WinFindTorr)
      T2 = T3
   EndIf
Else
   WinSetText(sDbg & sRes, h_WinFindTorr)
EndIf

Позже, когда информация о памяти не будет нужна, поменяйте bDbg = 1 на bDbg = 0. Если это действительно проблема взаимодействия с Everything (какой-то баг), то скорее всего ничего не поделаешь.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group