[更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线程.裸机系统2.3.3.1+18M酷M...

Bluebells

826773297 发表于 2022-7-20 21:33
不是取efi路径吗

不是，EFI 路径是判断依据，是取 GUID 值
因为我要用 bcdedit /delete 命令去删除路径值为 \EFI\Boot\lenovookr.efi 的启动条目

826773297

mdyblog 发表于 2022-7-20 21:43
FIND --class:Shell_TrayWnd --wid* &hw,
ENVI @@POS=?%&hw%:X:Y:W:H:
MESS %&hw%    X=%X% Y=%Y% W=%W ...

好的

Bluebells

826773297 发表于 2022-7-20 21:42
_SUB BCD_PATH
EXEC* BCD=!bcdedit.exe /enum firmware
LPOS* * ,BCD_B=%1,,BCD

可以了，非常感谢！

mdyblog

826773297 发表于 2022-7-20 21:25
-win似乎不对

1： 实际分辨率 多少
2： 显示 设置为100% 再试试

826773297

mdyblog 发表于 2022-7-20 21:47
1： 实际分辨率 多少
2： 显示 设置为100% 再试试

1920x1080分辨率，dpi是125%

826773297

Bluebells 发表于 2022-7-20 21:47
可以了，非常感谢！

不客气

mdyblog

826773297 发表于 2022-7-20 21:49
1920x1080分辨率，dpi是125%

那就对了

1536 * 1.25 = 1920
(824+40) * 1.25 = 1080
824 * 1.25 = 1030

Bluebells

826773297 发表于 2022-7-20 21:51
不客气

突然发现会有个尴尬的情况，不同语言环境时，GUID 前面的字符串不是“标识符”，虽然可以使用 chcp 命令设置活动代码页为英文并运行 bcdedit，但 chcp 毕竟是外部命令，又会有被阉割掉的可能

826773297

Bluebells 发表于 2022-7-20 22:00
突然发现会有个尴尬的情况，不同语言环境时，GUID 前面的字符串不是“标识符”，虽然可以使用 chcp 命令 ...

_SUB BCD_PATH
EXEC* BCD=!bcdedit.exe /enum firmware
LPOS* * ,BCD_B=%1,,BCD
CALC BCD_B=%BCD_B%-2
READ  -,%BCD_B%,BCD,%BCD%
MSTR BCD=<2->%BCD%
FIND ! $%BCD%=,mess %bcd%
_END
BCD_PATH \EFI\Microsoft\Boot\bootmgfw.efi

826773297

mdyblog 发表于 2022-7-20 21:58
那就对了

1536 * 1.25 = 1920

嗯，但是-win参数好像获取不准确
这个界面不知道是不是有问题，设置了125%缩放时出现错位情况

WIFI-SWIN.7z (1.73 KB, 下载次数: 10)

2022-7-20 22:04 上传

点击文件名下载附件
下载积分: 无忧币 -2

mdyblog

826773297 发表于 2022-7-20 22:04
嗯，但是-win参数好像获取不准确
这个界面不知道是不是有问题，设置了125%缩放时出现错位情况

SCRN -win W,H,X,Y,p
MESS  %X% %Y% %W% %H% %p%

824 * 1.25 = 1030    // 1030 是对的

mdyblog

826773297 发表于 2022-7-20 22:04
嗯，但是-win参数好像获取不准确
这个界面不知道是不是有问题，设置了125%缩放时出现错位情况

826773297 发表于 2022-7-20 22:04
嗯，但是-win参数好像获取不准确
这个界面不知道是不是有问题，设置了125%缩放时出现错位情况

SCRN -taskbar   W,H,X,Y,p
MESS  %X% %Y% %W% %H% %p%

824 * 1.25 = 1030    // 1030 是对的

826773297

mdyblog 发表于 2022-7-20 22:55
SCRN -taskbar   W,H,X,Y,p
MESS  %X% %Y% %W% %H% %p%

好的

泮安宁

m大，这个描述什么意思，是不是不加 -disaltmv参数就可以用Alt键加鼠标拖动窗口，但我测试好像没用，不加这个参数也不能拖动窗口

mdyblog

泮安宁 发表于 2022-7-21 10:52
m大，这个描述什么意思，是不是不加 -disaltmv参数就可以用Alt键加鼠标拖动窗口，但我测试好像没用，不加 ...

-top -forcenomin -disminb -maxb -discloseb -nosysmenu -nocap -[dis]altmv -size -trap -na]
-------------

-disaltmv 是默认的
用 -altmv  ： 用Alt键加鼠标拖动窗口

泮安宁

mdyblog 发表于 2022-7-21 11:56
-top -forcenomin -disminb -maxb -discloseb -nosysmenu -nocap -[dis]altmv -size -trap -na]
------- ...

可以了，但如果鼠标放在了控件上就没法拖动了，只能放在空白窗口上，这个有办法解决吗

826773297

泮安宁 发表于 2022-7-21 12:22
可以了，但如果鼠标放在了控件上就没法拖动了，只能放在空白窗口上，这个有办法解决吗

可以用窗口控件进行拖放

826773297

泮安宁 发表于 2022-7-21 12:22
可以了，但如果鼠标放在了控件上就没法拖动了，只能放在空白窗口上，这个有办法解决吗

不用按alt

mdyblog

泮安宁 发表于 2022-7-21 12:22
可以了，但如果鼠标放在了控件上就没法拖动了，只能放在空白窗口上，这个有办法解决吗

最简单的演示代码

泮安宁

826773297 发表于 2022-7-21 12:43
不用按alt

emmm，就是想按着alt来拖动窗口

泮安宁

mdyblog 发表于 2022-7-21 12:46
最简单的演示代码

Windows1
    _SUB Windows1,W360H440,WinCMD功能演示,,,,,-altmv
        ITEM item1,l50t100w200h50,ABC
_END

按着Alt，当鼠标放在ABC按钮上时就不能拖动窗口了，空白地方可以
---------------------------------------------------------------------------------------------------------
最终想把窗口做成透明的
Windows1
_SUB Windows1,W360H440,WinCMD功能演示,,,#:,,-altmv
        ITEM item1,l50t100w200h50,ABC
_END

这样就不能通过Alt键拖动按钮

mdyblog

泮安宁 发表于 2022-7-21 12:52
Windows1
    _SUB Windows1,W360H440,WinCMD功能演示,,,,,-altmv
        ITEM item1,l50t100w200h50, ...

      //临时禁用控件，响应AltMove

1. ENVI^ EnviMode=1
   
2. SET  ::WM_KEYDOWN=0x0100
   
3. SET  ::WM_KEYUP=0x0101
   
4. SET  ::WM_SYSKEYDOWN=0x0104
   
5. SET  ::WM_SYSKEYUP=0x0105
   
6. 
   
7. Windows1
   
8. _SUB Windows1,W360H440,WinCMD功能演示,,,20,,-altmv
   
9.       ITEM item1,l50t100w200h50,ABC
   
10.       SET &bAlt=1  
    
11.       //临时禁用控件，响应AltMove
    
12.       ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
13.       ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
14.       ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
15.       ENVI @item1.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
16.       ENVI @item1.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
17. _END
    
18. 
    
19. _SUB  ForAltMove
    
20.     SET bAlt=%1
    
21.     ENVI @item1.Enable=%1
    
22. _END

复制代码

泮安宁

mdyblog 发表于 2022-7-21 13:30
//临时禁用控件，响应AltMove

可以了，感谢m大

泮安宁

mdyblog 发表于 2022-7-21 13:30
//临时禁用控件，响应AltMove

如果有多个按钮

ENVI^ EnviMode=1
SET  ::WM_KEYDOWN=0x0100
SET  ::WM_KEYUP=0x0101
SET  ::WM_SYSKEYDOWN=0x0104
SET  ::WM_SYSKEYUP=0x0105

Windows1
_SUB Windows1,W360H440,WinCMD功能演示,,,20,,-altmv
      ITEM item1,l50t100w200h50,ABC
      ITEM item2,l50t150w200h50,ABC
      SET &bAlt=1  
      //临时禁用控件，响应AltMove
      ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
      ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
      ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
      ENVI @item1.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
      ENVI @item1.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
_END

_SUB  ForAltMove
    SET bAlt=%1
    ENVI @item1.Enable=%1
_END



这样item1一直都是不可用状态，这个怎么解决

mdyblog

泮安宁 发表于 2022-7-21 17:46
如果有多个按钮

ENVI^ EnviMode=1

1. ENVI^ EnviMode=1
   
2. SET  ::WM_KEYDOWN=0x0100
   
3. SET  ::WM_KEYUP=0x0101
   
4. SET  ::WM_SYSKEYDOWN=0x0104
   
5. SET  ::WM_SYSKEYUP=0x0105
   
6. SET  ::VK_ALT=0x12
   
7. 
   
8. Windows1
   
9. _SUB Windows1,W360H440,WinCMD功能演示,,,20,,-altmv
   
10.       ITEM item1,l50t100w200h50,ABC
    
11.       ITEM item2,l50t160w200h50,ABC
    
12.       SET &SubCtr=item1 item2
    
13.       SET &bAlt=1  
    
14.       //临时禁用控件，响应AltMove
    
15.       TIME -t:1 ,0,CALL * RegAltMove
    
16. _END
    
17. 
    
18. _SUB  ForAltMove
    
19.     SET bAlt=%1
    
20.     FORX * %&SubCtr%,&&Ctr, ENVI @%&Ctr%.Enable=%1
    
21. _END
    
22. 
    
23. _SUB  RegAltMove *
    
24.     ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
25.     ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
26.     ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
27.     FORX * %&SubCtr%,&&Ctr,
    
28.     {*  ^ENVI @%&Ctr%.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
29.         ^ENVI @%&Ctr%.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
30.     }
    
31. _END

复制代码

泮安宁

mdyblog 发表于 2022-7-21 18:44

好的

mdyblog

泮安宁 发表于 2022-7-21 19:04
好的

1. ENVI^ EnviMode=1
   
2. SET  ::WM_KEYDOWN=0x0100
   
3. SET  ::WM_KEYUP=0x0101
   
4. SET  ::WM_SYSKEYDOWN=0x0104
   
5. SET  ::WM_SYSKEYUP=0x0105
   
6. SET  ::VK_ALT=0x12
   
7. CALC #&&iALT=%&VK_ALT% + 1
   
8. 
   
9. Windows1
   
10. _SUB Windows1,W360H440,WinCMD功能演示,,,20,,-altmv
    
11.       ITEM item1,l50t100w200h50,ABC
    
12.       ITEM item2,l50t160w200h50,ABC
    
13.       SET &SubCtr=item1 item2
    
14.       SET &V0=
    
15.       SET &bAlt=1  
    
16.       //临时禁用控件，响应AltMove
    
17.       TIME -t:1 ,0,CALL * RegAltMove
    
18. _END
    
19. 
    
20. _SUB  ForAltMove
    
21.     @IFEX #%~1=%bAlt%, EXIT
    
22.     WAIT -scanall &&V
    
23.     FIND *&V0=&V, EXIT _SUB
    
24.     SET-copy V0=&V
    
25.     MSTR &&VAlt=<%iALT%>%&V%
    
26.     CALC #&VAlt=%VAlt% & 0x80
    
27.     IFEX #0=%~1,  IFEX #%VAlt%<>0x80, EXIT
    
28.     IFEX #1=%~1, IFEX #%VAlt%=0x80,   EXIT
    
29.     SET bAlt=%1
    
30.     FORX * %&SubCtr%,&&Ctr, ENVI @%&Ctr%.Enable=%1
    
31. _END
    
32. 
    
33. _SUB  RegAltMove *
    
34.     ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
35.     ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
36.     ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
37.     FORX * %&SubCtr%,&&Ctr,
    
38.     {*  ^ENVI @%&Ctr%.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
39.         ^ENVI @%&Ctr%.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
40.     }
    
41. _END

复制代码

泮安宁

mdyblog 发表于 2022-7-21 19:27

感谢m大

mdyblog

mdyblog 发表于 2022-7-21 19:27

1. ENVI^ EnviMode=1
   
2. SET  ::WM_KEYDOWN=0x0100
   
3. SET  ::WM_KEYUP=0x0101
   
4. SET  ::WM_SYSKEYDOWN=0x0104
   
5. SET  ::WM_SYSKEYUP=0x0105
   
6. SET  ::VK_ALT=0x12
   
7. 
   
8. Windows1
   
9. _SUB Windows1,W360H440,控件上AltMove,,,20,,-altmv
   
10.       ITEM item1,l50t100w200h50,ABC
    
11.       ITEM item2,l50t160w200h50,ABC
    
12.       SET &SubCtr=item1 item2
    
13.       SET &bAlt=1  
    
14.       //临时禁用控件，响应AltMove
    
15.       TIME -t:1 ,0,CALL * RegAltMove
    
16. _END
    
17. 
    
18. _SUB  ForAltMove
    
19.     @IFEX #%~1=%bAlt%, EXIT
    
20.     WAIT -scan:%&VK_ALT% &&VAlt
    
21.     CALC #&VAlt=%VAlt% & 0x80
    
22.     IFEX #0=%~1, IFEX #%VAlt%<>0x80, EXIT
    
23.     IFEX #1=%~1, IFEX #%VAlt%=0x80,  EXIT
    
24.     SET bAlt=%1
    
25.     FORX * %&SubCtr%,&&Ctr, ENVI @%&Ctr%.Enable=%1
    
26. _END
    
27. 
    
28. _SUB  RegAltMove *
    
29.     ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
30.     ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
31.     ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
32.     FORX * %&SubCtr%,&&Ctr,
    
33.     {*  ^ENVI @%&Ctr%.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
34.         ^ENVI @%&Ctr%.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
35.     }
    
36. _END

复制代码

mdyblog

mdyblog 发表于 2022-7-21 23:36

不变灰版

1. ENVI^ EnviMode=1
   
2. SET  ::WM_KEYDOWN=0x0100
   
3. SET  ::WM_KEYUP=0x0101
   
4. SET  ::WM_SYSKEYDOWN=0x0104
   
5. SET  ::WM_SYSKEYUP=0x0105
   
6. SET  ::VK_ALT=0x12
   
7. 
   
8. //临时禁用控件，响应AltMove,不变灰
   
9. 
   
10. Windows1
    
11. _SUB Windows1,W360H440,控件上AltMove(不变灰),,,20,,-altmv
    
12.       SWIN  -:WinIn:SwinWin1,L0T0W360H440,
    
13.       SET &bAlt=1  
    
14.       TIME -t:1 ,0,CALL * RegAltMove1
    
15. _END
    
16. _SUB WinIn,W360H440,
    
17.       ITEM item1,l50t100w200h50,ABC
    
18.       ITEM item2,l50t160w200h50,ABC
    
19.       SET &SubCtr=item1 item2
    
20.       TIME -t:1 ,0,CALL * RegAltMove
    
21. _END
    
22. 
    
23. _SUB  ForAltMove
    
24.     @IFEX #%~1=%bAlt%, EXIT
    
25.     WAIT -scan:%&VK_ALT% &&VAlt
    
26.     IFEX #0=%~1, IFEX #%VAlt%<0x80, EXIT
    
27.     IFEX #1=%~1, IFEX #%VAlt%>=0x80,  EXIT
    
28.     SET bAlt=%1
    
29.     ENVI @SwinWin1.Enable=%1
    
30. _END
    
31. 
    
32. _SUB  RegAltMove1 *
    
33.     ENVI @this.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
34.     ENVI @this.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
35.     ENVI @this.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
36. _END
    
37. 
    
38. _SUB  RegAltMove *
    
39.     FORX * %&SubCtr%,&&Ctr,
    
40.     {*  ^ENVI @%&Ctr%.MSG=$%WM_KEYDOWN%::&&wp,&&lp, ForAltMove 0
    
41.         ^ENVI @%&Ctr%.MSG=$%WM_SYSKEYDOWN%::&&wp,&&lp, ForAltMove 0
    
42.         ^ENVI @%&Ctr%.MSG=$%WM_SYSKEYUP%::&&wp,&&lp, ForAltMove 1
    
43.     }
    
44. _END

复制代码