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

826773297 · 发表于 2022-7-25 08:02:31

mdyblog 发表于 2022-7-24 22:25
下载最新版。
为了应付不恰当的滚动条设置，修改程序，搞出副作用了。
改回去了。看来，不能随便 ...

好的

826773297 · 发表于 2022-7-25 08:03:57

swin窗口有没有禁止鼠标滚动的参数

826773297 · 发表于 2022-7-25 08:28:15

swin窗口的上下滚动条可否设置颜色

mdyblog · 发表于 2022-7-25 09:50:23

826773297 发表于 2022-7-25 08:03
swin窗口有没有禁止鼠标滚动的参数

默认无滚动条。
有问题，就来个最简单演示代码。

826773297 · 发表于 2022-7-25 10:00:44

mdyblog 发表于 2022-7-25 09:50
默认无滚动条。
有问题，就来个最简单演示代码。

#code=950T936
ENVI^ EnviMode=1
ENVI^ ForceLocal=1
SET  &::WM_MOUSELEAVE=0x02A3
SET  &::WM_MOUSEENTER=0x1000
SET  &::WM_LBUTTONDOWN=0x0201
call GetDpiPercent
call @Page1

_sub Page1,W350H500,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -left -trans WLAN,W100H30,WLAN,,ffffff,12:宋体**####3
swin swin1:Win1:-SwinMain1,l0 t20 w350 h400,,
_end
_sub Win1,W350H400,,,,,, %ScaleCMD%
swin swin2:Win2:-SwinMain2,l0 t0 w350 h100,,
swin swin3:Win3:-SwinMain3,l0 t100 w350 h50,,
_END
_sub Win2,W350H100,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T15W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_end
_sub Win3,W350H100,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T15W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_end

_sub GetDpiPercent *
      call $user32.dll,SetProcessDPIAware
      call $--ret:hdc user32.dll,GetDC,#0
      call $--ret:LogPixels Gdi32.dll,GetDeviceCaps,#%hdc%,#90
      set ScaleCMD=-scalef:%LogPixels% -scale:%LogPixels%
_end

win3子窗口在没加滚动条的情况下可以滚动

826773297 · 发表于 2022-7-25 10:11:43

call @Page1

_sub Page1,W350H500,,,,,,
ENVI @this.bkcolor=0x000000
LABE WLAN,W100H30,WLAN,,ffffff,12:宋体
swin swin1:Win1:-SwinMain1,l0 t20 w350 h100,,
_end
_sub Win1,W350H400,,,,,,
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T15W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_END

最简单示例用手机打的，可能有问题，win1子窗口不加滚动条也能滚动

mdyblog · 发表于 2022-7-25 10:13:57

本帖最后由 mdyblog 于 2022-7-25 10:16 编辑

826773297 发表于 2022-7-25 10:00
#code=950T936
ENVI^ EnviMode=1
ENVI^ ForceLocal=1

控件和子窗口等大就不滚动了。

swin swin3:Win3:-SwinMain3,L0T100W350H50,, ===》
swin swin3:Win3:-SwinMain3,L0T100W350H100,,
----
_sub Win3,W350H100,,,,,, %ScaleCMD%

控件 swin3 和子窗口 Win3 等大

826773297 · 发表于 2022-7-25 10:24:46

mdyblog 发表于 2022-7-25 10:13
控件和子窗口等大就不滚动了。

swin swin3:Win3:-SwinMain3,L0T100W350H50,, ===》

最好是不等大也不滚动。这样才好仿超级按钮，要滚动的时候才滚动

826773297 · 发表于 2022-7-25 10:26:07

swin窗口的优势就在于多控件整合，鼠标滚动控制很关键

826773297 · 发表于 2022-7-25 10:26:53

加一个禁止滚动的参数即可

826773297 · 发表于 2022-7-25 10:27:15

这样我的按钮排版就不会乱

mdyblog · 发表于 2022-7-25 11:26:30

本帖最后由 mdyblog 于 2022-7-25 12:38 编辑

826773297 发表于 2022-7-25 10:27
这样我的按钮排版就不会乱

最新版试试。即使不等大，默认也不滚动。
不知道这样是否有（滚轮方面的）副作用。先用用试试。

826773297 · 发表于 2022-7-25 12:26:33

mdyblog 发表于 2022-7-25 11:26
最新版试试。及时不等大，默认也不滚动。
不知道这样是否有（滚轮方面的）副作用。先用用试试。

哦。我回去后试一下

红毛樱木 · 发表于 2022-7-25 13:44:54

mdyblog 发表于 2022-7-25 11:26
最新版试试。即使不等大，默认也不滚动。
不知道这样是否有（滚轮方面的）副作用。先用用试试。

从字面理解“默认也不滚动” 就有问题了吧。。。

mdyblog · 发表于 2022-7-25 15:19:26

红毛樱木发表于 2022-7-25 13:44
从字面理解“默认也不滚动” 就有问题了吧。。。

没有用 0x180 打开滚动条。

826773297 · 发表于 2022-7-25 15:28:13

很多老外盯上了pecmd编程

shmoss · 发表于 2022-7-25 19:57:26

PUTF不出BITMAP中的资源劳M大修复下

IFEX~ %CurDir%\WIFI.dll,set 图标=%CurDir%\WIFI.dll
WIN1
_SUB WIN1,W516H444,窗口,
IMAG ,L6T10W60H60,%图标%#1|BITMAP
PUTF* %_CD%\1.bmp,,"%图标%""#1|BITMAP"
PUTF* %_CD%\2.bmp,,"%图标%""#1|EXEDATA"
_END

复制代码

新建文件夹.7z (9.91 KB, 下载次数: 8)

mdyblog · 发表于 2022-7-25 21:32:55

shmoss 发表于 2022-7-25 19:57
PUTF不出BITMAP中的资源劳M大修复下

PUTF* %_CD%\1.bmp,,"%图标%""#1|BITMAP"
----->
ENVI BITMAP=#2
PUTF* %_CD%\1.bmp,,"%图标%""#1|%BITMAP%"
-----------------------
https://www.cnblogs.com/findumars/p/6329510.html
RT_BITMAP

826773297 · 发表于 2022-7-25 21:37:14

mdyblog 发表于 2022-7-25 21:32
PUTF* %_CD%\1.bmp,,"%图标%""#1|BITMAP"
----->
ENVI BITMAP=#2

#code=950T936
ENVI^ EnviMode=1
ENVI^ ForceLocal=1
SET  &::WM_MOUSELEAVE=0x02A3
SET  &::WM_MOUSEENTER=0x1000
SET  &::WM_LBUTTONDOWN=0x0201
call GetDpiPercent
call @Page1

_sub Page1,W350H500,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -left -trans WLAN,W100H30,WLAN,,ffffff,12:宋体**####3
swin swin1:Win1:-SwinMain1,l1 t20 w340 h400,,0x180
_end
_sub Win1,W340H800,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
swin swin2:Win2:-SwinMain2,l0 t0 w340 h100,,
swin swin3:Win3:-SwinMain3,l0 t450 w340 h50,,
_END
_sub Win2,W340H100,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T5W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_end
_sub Win3,W340H50,,,,,, %ScaleCMD%
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T15W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_end

_sub GetDpiPercent *
      call $user32.dll,SetProcessDPIAware
      call $--ret:hdc user32.dll,GetDC,#0
      call $--ret:LogPixels Gdi32.dll,GetDeviceCaps,#%hdc%,#90
      set ScaleCMD=-scalef:%LogPixels% -scale:%LogPixels%
_end

-------------------------------------------------------------------------------------------
swin窗口的滚动条可否设置颜色

shmoss · 发表于 2022-7-25 21:48:09

mdyblog 发表于 2022-7-25 21:32
PUTF* %_CD%\1.bmp,,"%图标%""#1|BITMAP"
----->
ENVI BITMAP=#2

这无法正常显示

mdyblog · 发表于 2022-7-25 22:03:18

826773297 发表于 2022-7-25 21:37
#code=950T936
ENVI^ EnviMode=1
ENVI^ ForceLocal=1

来个最简单的演示代码

shmoss · 发表于 2022-7-25 22:43:11

mdyblog 发表于 2022-7-25 21:32
PUTF* %_CD%\1.bmp,,"%图标%""#1|BITMAP"
----->
ENVI BITMAP=#2

IFEX~ %CurDir%\WIFI.dll,set 图标=%CurDir%\WIFI.dll
_SUB WIN1,W516H444,窗口,
IMAG ,L6T10W60H60,%图标%#1|BITMAP
getf "%图标%""#1|#2",0#*,&&a
putf* "%_CD%\1.bmp",,0x42 0x4D 0x38 0xE1 *6 0x00 0x36 *3 0x00 %&&a%
PUTF* %_CD%\2.bmp,,"%图标%""#1|EXEDATA"
_END
WIN1
能把这个加进去吗五大说这少文件头

复制代码

shmoss · 发表于 2022-7-25 23:50:58

putf* "%_CD%\1.bmp",,0x42 0x4D 0x38 0xE1 *6 0x00 0x36 *3 0x00 %&&a%实测固定值可以提取

826773297 · 发表于 2022-7-26 07:44:07

本帖最后由 826773297 于 2022-7-26 07:45 编辑

mdyblog 发表于 2022-7-25 22:03
来个最简单的演示代码

call @Page1

_sub Page1,W350H500,,,,,,
ENVI @this.bkcolor=0x000000
swin swin1:Win1:-SwinMain1,l1 t20 w340 h400,,0x180
_end
_sub Win1,W340H800,,,,,,
ENVI @this.bkcolor=0x000000
swin swin3:Win3:-SwinMain3,l0 t450 w340 h50,,
_END
_sub Win3,W340H50,,,,,,
ENVI @this.bkcolor=0x000000
LABE -trans Labewlan,L20T15W100H20,这是一个无线,,ffffff,12:宋体**####10
ITEM Itemwlan,T25L290W50H20,连接
_end

更改swin滚动条颜色

shmoss · 发表于 2022-7-26 09:55:13

TIPS 用编译后的PNG图片可以吗
TIPS* ,%连接名%,,,"%myname%""#8|PNG"
不能显示

826773297 · 发表于 2022-7-26 10:16:37

adsl命令列出的无线网络列表是否有信道一栏显示

shmoss · 发表于 2022-7-26 10:38:14

本帖最后由 shmoss 于 2022-7-26 10:40 编辑

应该怎样显示|BITMAP中的图片呢有示例吗
ENVI @图标.update=88:88:518:5::;%CurDir%\OEM\%Z7%.bmp
ENVI @图标.update=88:88:518:5::;"%图标%""#%Z7%|BITMAP"

mdyblog · 发表于 2022-7-26 11:10:15

shmoss 发表于 2022-7-26 10:38
应该怎样显示|BITMAP中的图片呢有示例吗
ENVI @图标.update=88:88:518:5::;%CurDir%\OEM\%Z7%.bmp
ENVI ...

加载图片时，认识 BITMAP 标识子串
ENVI @图标.update=88:88:518:5::;"%图标%""#%Z7%|BITMAP"

shmoss · 发表于 2022-7-26 11:20:47

mdyblog 发表于 2022-7-26 11:10
加载图片时，认识 BITMAP 标识子串
ENVI @图标.update=88:88:518:5::;"%图标%""#%Z7%|BITMAP"

这RH编译器编译好手动打开看不见.bmp图片却能PUTF*出来但无法ENVI @图标.update。。。
然后我手动做个dll 可以显示把.bmp后缀改下才可以放到EXEDATA中放EXEDATA中是无法显示的目测RH编译器的问题

mdyblog · 发表于 2022-7-26 12:04:12

shmoss 发表于 2022-7-26 11:20
这RH编译器编译好手动打开看不见.bmp图片却能PUTF*出来但无法ENVI @图标.update。。。
然后我手动做 ...

资源bitmap 中是优化处理的BMP，和BMP文件不同。

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