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
ZiabrevLV



PostPosted: Tue Apr 14, 2026 13:34    Post subject: Reply with quote

Прошу помочь с командой:

Code:

#Переключение значков файловых панелей
RegisterCommand 67001 "SwitchIcons"
Func SwitchIcons(lParam)
Local sIconLib

#Проверка наличия ключа IconLib в секции [Configuration] файла wincmd.ini
IniRead sIconLib  %COMMANDER_INI% "Configuration "IconLib" ""
If StrPossIconLib, "") Then

#Поквзывает собственные значки ТС
  IniWrite  %COMMANDER_INI% "Configuration" "IconLib" "%COMMANDER_EXE%"

Else

#Поквзывает аматерные значки - Fileicons.dll
iniWrite  %COMMANDER_INI% "Configuration" "IconLib" "%COMMANDER_PATH%\Fileicons.dll"
EndIf

#Обновляетм значки файловых панелей
   CommandExec cm_ReloadFileIcons
EndFunc


Не работает - ошибка If StrPossIconLib, "" - параметр не определён.
Требуется поправить.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group