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: Wed Mar 05, 2025 18:14    Post subject: Reply with quote

Проиграть звук в Autorun? Да без проблем! Very Happy

Code:
file = "C:\Windows\Media\tada.wav"
DllCall("Winmm.dll\PlaySoundW", "wstr", file,  "ptr", 0, "dword", 131072 + 1)


Loopback, пока не поставил в конце имени PlaySoundW, функция не хотела работать, хотя в справке говорится, что такая подстановка должна происходить автоматически. Уже второй раз замечаю.

Решил переделать тёмный хинт под новые параметры задержки:
Code:
Func ShowDarkHint(DarkHint, Delay = 0, Flags = 0)
    # формат подсказки
    SetHintParam("ShowHint", "Font", 10, "Arial")
    SetHintParam("ShowHint", "BackColor", 0x001C1C1C)
    SetHintParam("ShowHint", "Text", 0xFFFFFF)   
    # отображение подсказки
    ShowHint(DarkHint, "", "", Delay, Flags)
    # возвращение формата по умолчанию
    Sleep(50)
    SetHintParam("ShowHint", "Reload")   
EndFunc

Поскольку у этой функции два необязательных параметра на конце, не будет ли каких проблем с простым вызовом вроде ShowDarkHint("Текст"), или лучше указывать хотя бы один параметр, т.е. ShowDarkHint("Текст", 0)?

Раньше у меня был второй вариант.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group