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

826773297 · 发表于 2022-7-28 22:04:03

mdyblog 发表于 2022-7-28 21:10
滑块改不了。

11系统这里有点怪怪的，能不能修一下

mdyblog · 发表于 2022-7-28 23:54:56

本帖最后由 mdyblog 于 2022-7-29 00:20 编辑

826773297 发表于 2022-7-28 22:04
11系统这里有点怪怪的，能不能修一下

ENVI @SBARV.nxp= //传统模式
-------------------------

swinbar-color.wcs.zip (948 Bytes, 下载次数: 4)
效果：

826773297 · 发表于 2022-7-29 08:11:59

mdyblog 发表于 2022-7-28 23:54
ENVI @SBARV.nxp= //传统模式
-------------------------

鼠标没法滚动吗

shmoss · 发表于 2022-7-29 09:00:40

本帖最后由 shmoss 于 2022-7-29 09:34 编辑

//RH编译时使用压缩算法打包。这会减小文件大小，也使查看和提取变得困难

FORX /O:N "%CurDir%\PNG\*.png",i,0,TEAM NAME 名称=%i%|%&CMD+% "%i%",PNG,%名称%,0
FORX /O:N "%CurDir%\part\OEM\*.bmp",&&i,0,TEAM NAME 名称=%i%|%&CMD+% "%i%",BITMAP,%名称%,0

复制代码

编译png和bmp会让其不可见 pecmd调用时 png可显示而bmp不能显示
而且png可以放到EXEDATA且可以显示而bmp放到EXEDATA 调用时显示一团乌黑
bmp不能像png一样被显示

如果要显示bmp只能把bmp提取出来
把bmp放到EXEDATA PUTF到临时文件再显示
把bmp放到BITMAP 获取文件头添加文件头PUTF到临时文件再显示

getf "%图标%""#1|#2",0#*,&&a
putf* "%_CD%\1.bmp",,0x42 0x4D 0x38 0xE1 *6 0x00 0x36 *3 0x00 %&&a% //红字经多次实验是固定值
IMAG ,L6T%T%W60H60,"%_CD%\1.bmp"
显然bmp放到BITMAP比较严谨规范我有个小小心愿希望bmp能和png一样可以被支持显示望M大神能实现

mdyblog · 发表于 2022-7-29 18:01:32

shmoss 发表于 2022-7-29 09:00
//RH编译时使用压缩算法打包。这会减小文件大小，也使查看和提取变得困难
编译png和bmp会让其不可见 pecmd ...

新版。
正常的BMP文件用CMPS -m 压缩。
添加到EXEDATA下。
然后就可以用了。

IMAG IMAG1,L6T0W60H60,%&CurDir%\pecmd1.exe#1|EXEDATA //BMP 用高级方式显示，会自动缩放

IMAG IMAG1,L6T0W60H60,%&CurDir%\pecmd1.exe#1|EXEDATA*BITMAP //BMP强制用BITMAP显示，不缩放。

mdyblog · 发表于 2022-7-29 21:22:46

本帖最后由 mdyblog 于 2022-7-30 05:54 编辑

826773297 发表于 2022-7-29 08:11
鼠标没法滚动吗

28F版
示例\swinbar-color.wcs

826773297 · 发表于 2022-7-30 08:29:05

mdyblog 发表于 2022-7-29 21:22
28F版
示例\swinbar-color.wcs

不太稳，swin窗口里面的swin窗口也能滚动

826773297 · 发表于 2022-7-30 08:29:53

不是绑定哪个窗口就滚动哪个吗

826773297 · 发表于 2022-7-30 08:31:24

其实我觉得滚动条还是swin自带的好，加一个颜色和nxp参数就行

shmoss · 发表于 2022-7-30 09:10:20

本帖最后由 shmoss 于 2022-7-30 09:46 编辑

mdyblog 发表于 2022-7-29 18:01
新版。
正常的BMP文件用CMPS -m 压缩。
添加到EXEDATA下。

56KB压缩成8KB 太棒了

但应该怎样切换呢
ENVI @图标.update=88:88:518:5::;pecmd1.exe#2%Z7%|EXEDATA*BITMAP
ENVI @图标.update=88:88:518:5::;#2%Z7%|EXEDATA*BITMAP ？
这次更新打包后加大了2M 我在工具中内置了一个PECMD

826773297 · 发表于 2022-7-30 10:49:46

shmoss 发表于 2022-7-30 09:10
56KB压缩成8KB 太棒了但应该怎样切换呢
ENVI @图标.update=88:88:518:5::;pecmd1.exe#2%Z7%|EX ...

看看水手在玩什么

mdyblog · 发表于 2022-7-30 12:40:22

shmoss 发表于 2022-7-30 09:10
56KB压缩成8KB 太棒了但应该怎样切换呢
ENVI @图标.update=88:88:518:5::;pecmd1.exe#2%Z7%|EX ...

ENVI @图标.update=88:88:518:5::;pecmd1.exe#2%Z7%|EXEDATA*BITMAP
-------------------

1：这次更新打包后加大了2M 我在工具中内置了一个PECMD

可以内置到主程序本身#2，不必须pecmd1.exe
^ENVI @图标.update=88:88:518:5::;#2|EXEDATA*BITMAP

2：但应该怎样切换呢
^ENVI @图标.update=88:88:518:5::;#2|EXEDATA*BITMAP
^ENVI @图标.update=88:88:518:5::;#3|EXEDATA*BITMAP

mdyblog · 发表于 2022-7-30 14:19:51

本帖最后由 mdyblog 于 2022-7-30 18:13 编辑

826773297 发表于 2022-7-30 08:29
不是绑定哪个窗口就滚动哪个吗

28G 滑块可以设定颜色

#code=950T936
@TEAM ENVI^ EnviMode=1| ENVI^ ForceLocal=1
//call GetDpiPercent
call @Page1
_sub Page1,L100T0W360H500,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -left -trans WLAN,W100H30,WLAN,,ffffff,12:宋体**####3
swin swin1:Win1:-SwinMain1,L1T20W335H400,,
SBAR -color:0xFF0000:0x00FFFF:*SwinMain1 SBARV,L336T20W15H400,0:800:100:400,,
_end
_sub Win1,W335H800,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x0000F0
LABE -wx Label1,L150T0W10H800,0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijiklnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ
_END

复制代码

SBAR去掉* 则 SWIN上不响应滚轮

泮安宁 · 发表于 2022-7-30 19:09:31

mdyblog 发表于 2022-7-30 14:19
28G 滑块可以设定颜色

SBAR去掉* 则 SWIN上不响应滚轮

最新版，swin不用0x180，也不加SBAR滚动条，子窗口也会滚动，是不是bug

826773297 · 发表于 2022-7-30 19:38:25

泮安宁发表于 2022-7-30 19:09
最新版，swin不用0x180，也不加SBAR滚动条，子窗口也会滚动，是不是bug

今天，你低调了没

826773297 · 发表于 2022-7-30 19:39:07

mdyblog 发表于 2022-7-30 14:19
28G 滑块可以设定颜色

SBAR去掉* 则 SWIN上不响应滚轮

好的

泮安宁 · 发表于 2022-7-30 19:45:31

826773297 发表于 2022-7-30 19:38
今天，你低调了没

看你表演

mdyblog · 发表于 2022-7-30 19:47:02

泮安宁发表于 2022-7-30 19:09
最新版，swin不用0x180，也不加SBAR滚动条，子窗口也会滚动，是不是bug

最新版应该不会的。
#code=950T936
@TEAM ENVI^ EnviMode=1| ENVI^ ForceLocal=1
call @Page1
_sub Page1,L100T0W360H500,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -left -trans WLAN,W100H15,WLAN,,ffffff,12:宋体**####3
swin swin1:Win1:-SwinMain1,L1T20W335H400,,
//SBAR -color:0xFF0000:0x00FFFF:*SwinMain1 SBARV,L336T20W15H400,0:800:100:400,, //NO*: SwinMain1 no WHEEL
_end

_sub Win1,W335H800,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x0000F0
LABE -wx Label1,L150T0W10H800,0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijiklnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ
_END

泮安宁 · 发表于 2022-7-30 21:06:46

mdyblog 发表于 2022-7-30 19:47
最新版应该不会的。
#code=950T936
@TEAM ENVI^ EnviMode=1| ENVI^ ForceLocal=1

28D版不会滚动

泮安宁 · 发表于 2022-7-30 22:12:52

m大，pecmd可以在任务栏显示文字吗，图示箭头所指的ABC的位置

mdyblog · 发表于 2022-7-30 22:32:35

泮安宁发表于 2022-7-30 21:06
28D版不会滚动

试试最新28H

泮安宁 · 发表于 2022-7-30 23:04:02

mdyblog 发表于 2022-7-30 22:32
试试最新28H

还是会滚动

mdyblog · 发表于 2022-7-31 06:48:30

泮安宁发表于 2022-7-30 23:04
还是会滚动

请试试28I

泮安宁 · 发表于 2022-7-31 08:17:43

mdyblog 发表于 2022-7-31 06:48
请试试28I

28J可以了

mdyblog · 发表于 2022-7-31 14:26:52

那好

mdyblog · 发表于 2022-7-31 21:36:21

本帖最后由 mdyblog 于 2022-8-1 08:34 编辑

mdyblog 发表于 2022-7-31 14:26
那好

Win7任务栏进度条(28K版) 示例\TaskbarPbr-tst.WCS

_SUB TaskBarPer  // %__WinID%  进度数  总数
ENVI^ ForceLocal=1
  SET$ mpTaskBarlist3=*8 0
  SET &CLSCTX_INPROC_SERVER=0x1
  SET#$ &CLSID_TaskbarList=44 f3 fd 56 6d fd d0 11 95 8a  00 60 97 c9 a0 90  //CLSID_TaskbarList={56fdf344-fd6d-11d0-958a-006097c9a090}
  SET#$ &IID_ITaskbarList3=91 FB 1A EA 28 9E 86 4B 90 E9  9E 9F 8A 5E EF AF  //IID_ITaskbarList3={EA1AFB91-9E28-4B86-90E9-9E9F8A5EEFAF}
  lock .ole
  CALL $--ret:* --qd --16  OLE32.DLL,CoCreateInstance,&&hr,*CLSID_TaskbarList,#0,#%CLSCTX_INPROC_SERVER%,*IID_ITaskbarList3,*mpTaskBarlist3
  SET?ptr  mpTaskBarlist3=&&vpTaskBarlist3  //BIN==>字符串形式vpTaskBarlist3
  IFEX  #[ 0<>%&hr% | 0=%vpTaskBarlist3% ], EXIT
  SET?ptr  %vpTaskBarlist3%=&&Vtbl3
  ^SET?ptr  %Vtbl3%=&&Release:(%ptrlen%*2)
  ^SET?ptr  %Vtbl3%=&&HrInit:(%ptrlen%*3)
  ^SET?ptr  %Vtbl3%=&&SetProgressValue:(%ptrlen%*9)
  ^SET?ptr  %Vtbl3%=&&SetProgressState:(%ptrlen%*10)
  CALL $--ret:&&rs --qd#  #,%HrInit%,%vpTaskBarlist3%
  IFEX #[ 0<=%~2 & %~2<=0xF & ''='%~3' ], ^CALL $--ret:&&rs --qd#  #,%SetProgressState%,%vpTaskBarlist3%,%~1,%~2
  IFEX #[ 0<=%~2 & 0<%~3 ],!! ^CALL $--ret:&&ri --qd:##<<  #,%SetProgressValue%,%vpTaskBarlist3%,%~1,%~2,%~3
  CALL $--ret:&&ri --qd#  #,%Release%,%vpTaskBarlist3%  //释放COM
_END

----------------
TaskBarPer WinID  进度数  总数
TaskBarPer WinID  0 //取消
TaskBarPer WinID  1 //滚动
TaskBarPer WinID  2 //正常颜色
TaskBarPer WinID  4 //红色
TaskBarPer WinID  8 //暂停


测试
WIN1
_SUB WIN1,W730H254,任务栏进度条演示,
TIME -t:1 T1,0,TEAM TaskBarPer %__WinID%  40 100|  WAIT 1000| TaskBarPer %__WinID%  80  100|  WAIT 1000| TaskBarPer %__WinID%  100 100|  WAIT 2000| TaskBarPer %__WinID%  0
_END

826773297 · 发表于 2022-8-1 12:47:28

pecmd是否有"忘记网络"/获取已输入密码的无线名称/已输入密码的无线直接连接功能

826773297 · 发表于 2022-8-1 12:57:27

如何知道每个网卡连接的无线名

mdyblog · 发表于 2022-8-1 14:38:27

826773297 发表于 2022-8-1 12:57
如何知道每个网卡连接的无线名

PCIP ? IP,MASK,GW,DNS,0?NAME,MAC,LINK
MESS [%LINK%]

PCIP ? IP,MASK,GW,DNS,1?NAME,MAC,LINK
PCIP ? IP,MASK,GW,DNS,2?NAME,MAC,LINK
...

mdyblog · 发表于 2022-8-1 14:38:51

826773297 发表于 2022-8-1 12:57
如何知道每个网卡连接的无线名

无线名 ???

		自动登录	找回密码
密码			注册

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

点评

点评

点评

点评

评分

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评