Orion9

|
Posted: Wed May 28, 2025 18:59 Post subject: |
|
|
Коммандер сказал "От винта!"
 .aucfg Code: | RegisterCommand 62016 "RotateIcon"
Global ROTATE_THREAD = 0
Func RotateIcon()
If ROTATE_THREAD > 0 Then
ROTATE_THREAD = 0
Return
EndIf
RunThread ThreadRotateIcon
EndFunc
Func ThreadRotateIcon()
ROTATE_THREAD = 1
While ROTATE_THREAD > 0
Sleep(100)
IconRotateDraw()
Wend
EndFunc
Func IconRotateDraw()
Static nIco = 0
nIco += 1
If nIco > 4 Then nIco = 1
Local sFile = COMMANDER_PATH & "\Icons\TC\" & nIco & ".ico"
Local hIco = DllCall("shell32\ExtractIconW", _
"ptr", AUTORUN_TCHANDLE, _
"wstr", sFile, _
"uint", 0, _
"ptr")
Local hWnd = WinFind(AUTORUN_TCHANDLE, _
(AUTORUN_TCARCH = 32 ? "TMyPanel" : "Window"), _
(AUTORUN_TCARCH = 32 ? 5 : 7))
Local hDC = DllCall("GetWindowDC", "ptr", hWnd, "ptr")
Local x, y, w, h
WinGetPos("x", "y", "w", "h", hWnd)
DllCall("DrawIconEx", _
"ptr", hDC, _
"int", w - 30, _
"int", 1, _
"ptr", hIco, _
"int", 12, _
"int", 12, _
"uint", 0, _
"ptr", 0, _
"uint", 0x0003)
SendMessage(AUTORUN_TCHANDLE, 0x80, 0, hIco)
SendMessage(AUTORUN_TCHANDLE, 0x80, 1, hIco)
DllCall("ReleaseDC", "ptr", AUTORUN_TCHANDLE, "ptr", hDC)
DllCall("DestroyIcon", "ptr", hIco)
EndFunc
|
 Icons Code: | MIME-Version: 1.0
Content-Type: application/octet-stream; name="TC.7z"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="TC.7z"
N3q8ryccAATOSPgoMQQAAAAAAAAiAAAAAAAAAK6TTgPgEfcDrl0AAGAEkCoDQi96BFoomAoR6Kca
ksXsmah8Y2qfDe7uVm/oRITsfehEAWs4l3R/Nrj2A4m3iNMBRthITX7tVq2teSW4C/jO76jbgp/d
LbY3JMdcHOvv3u0e+Mafgo5oCZcQrwLQHTnkdcbdu4TZ9sGdkUDpGJ8r6N38csmd8i3UW0HHNaJw
riccfaKMfdIRWCOiYtyV3elDlLLghOUGCM2uxHU31Ifry7GIrJademsy7TMN2XbSz0ct37RKIg4w
B9R2hz5K/PRhXkB/IdCnjUwdPKVjSBw+5BmHwoHrDLfLPgq7cajARU1A6sNXACNXJEzJAY74MBS1
Wp/36QTgRAMMx0Kowu04W5XGnTl+/fRC99ICdEamxdG9Wu9ykcwKR6Nrl3lzqSPNeR8sZaXfixmw
b4K70KzwQstwZxLG3eUKEf98CvtGUuTaTeaLoKnscBrlrcZT2AGHywiirJ5pnBD39QPy073fntiD
u19RuRHpm00duKxjy8B+r7KYHlec7FnUyv2s8do7VEwNWO4jThua69EFIeA/8NvibAaFPCXiZp4J
rTiDO5GdNLZd1/xz+vJTaB/XnZhW9XRPK6JKjkrv7x/ixcN0PYMMWJ1GjcIykrhR68ZcooqcnCgK
sA2DHluYDhQ07B5Fy9qIRPWHy+gCCAEw7l6RV7g4kOIhIXJH/0TgtFNN82zTjacG2o4aG+6K2h6E
QY9rtnun6d6l+N5kywA3VQTQtqp64QESdyXgITw23Xgq8NbyRrciQx8At+LgLejPB+QWTHSmUbLe
DkOmS78l8N69brWxjLOhtPXumLguC5n50ZRKIo2hoXYK+uyzYu81jhxVEPeis27RqXdcRKO35K1t
je7bdL6NktQSO5d+4+pt6yGVDR4NMD1Jv9YQq9/GVARNdao7MpPErvo3fSTWJWKD4AWdauoWF7+q
B2AikrXt3R3N8/omjU7aHzi/JeFNve/eoK/HHokNziDbeKjhp0WbOnIBGWFHNjGAju2/21xSezfH
G5tbYGZCFdFGrCY4Z5q8HpAX8ZOV7eoR8zNLSsh6ql2NALlbU20F0+043W/K8zvMb5j0E2o0WgJN
TqB0i7ZkYxt3UXbfxAgqI0PG4NeBNQ42fp+vzTN79syYxNjN/q3pXlJrttF2/bWvCLjIKz8xpB9j
eCwlHXnUbnTfSkAPRvME15VMYUUEwQq2w5I/9qBOpFf5RUecmtffTF6mujgmeBlkkOG7jEujKav/
eCtJJklnxGl5oeTAAAAAgTMHrg/VUdtGlyTT/rNwFrFR7o9meG60H5TdVtMt2E/AVhb/besx56NL
glhEy1xsT8hbcNiw73O6polZti1hRoPHJr+Hsavanp2tBVFU+x4nNeiI831KFKi8iCGq5LCEcM5F
gzGK0trybzIaFbekvPW/KVKYjO0dIBcGg7YBCXsABwsBAAEjAwEBBV0AEAAADICuCgEEjNTnAAA=
|
 Button Code: | TOTALCMD#BAR#DATA
62016
%COMMANDER_EXE%
Поехали!
-1
|
Loopback wrote: | всё остальное прикладные задачи, которые могут быть сделаны в любое время |
Об этом было в топике: одной из фич, которую хотелось бы увидеть, умение Autorun каким-то образом сообщать статус долгих операций. Пример выше, конечно, больше шуточный, но хотелось бы чего-то такого, более серьёзного.
P.S.
 yozhik Autorun - это Cosmos ) |
|