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: Drag&Drop на главной панели инструментов 
Author Message
Orion9



PostPosted: Mon Jul 20, 2026 13:03    Post subject: Reply with quote

sa wrote:
команда с использованием TCFS2

Можно такое на Autorun повторить. Есть шаблон Smile
Code:
Local b, i, h = 0
PostMessage(AUTORUN_TCHANDLE, 0x433, 519)
# ожидание окна
For i = 1 To 75
    h = WinFind(0, "TDlgCustomColors")
    If h > 0 Then Break   
    Sleep(20)
Next
If h > 0 Then   
   b = WinFind(h, (AUTORUN_TCARCH = 32 ? "TButton" : "Button"), (AUTORUN_TCARCH = 32 ? 3 : 2))
   SendMessage(b, 0xF5, 0, 0)
Else
   ShowHint("Окно не найдено")
   Return 
Endif
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group