无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
楼主: mdyblog
打印 上一主题 下一主题

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

    [复制链接]
17461#
 楼主| 发表于 2022-7-22 19:02:46 | 只看该作者
本帖最后由 mdyblog 于 2022-7-22 19:13 编辑
caocaofff 发表于 2022-7-22 18:59
m大,有没有现成的英文版帮助说明的PECMD呢

完整包中带的有中英文HELP  (PECMD.exe.437.lang为英文HELP); 纯英文系统上, 默认就是英文界面。
SET LC_ALL=437
PECMD HELP


点评

#code=950T936 envi^ EnviMode=1 envi^ ForceLocal=1 call GetDpiPercent call @Page1 _sub Page1,w347 h297,,,,,, %ScaleCMD% swin swin1:Win1:-SwinMain1,l0 t0 w347 h205,,0x100 _end _sub  详情 回复 发表于 2022-7-22 21:14
好的  详情 回复 发表于 2022-7-22 19:23
回复

使用道具 举报

17462#
发表于 2022-7-22 19:23:18 | 只看该作者
mdyblog 发表于 2022-7-22 19:02
完整包中带的有中英文HELP  (PECMD.exe.437.lang为英文HELP); 纯英文系统上, 默认就是英文界面。
SE ...

好的
回复

使用道具 举报

17463#
发表于 2022-7-22 21:02:18 | 只看该作者
826773297 发表于 2022-7-22 14:10
窗口设置dpi后,控件大小发生了改变,labe透明标签高度为20,字体大小是8的情况下显示不全

我觉得最别扭的还是 LIST 控件,在不同的DPI下其高度差别很大。

点评

没错  详情 回复 发表于 2022-7-22 21:12
回复

使用道具 举报

17464#
发表于 2022-7-22 21:12:14 | 只看该作者
Anson4 发表于 2022-7-22 21:02
我觉得最别扭的还是 LIST 控件,在不同的DPI下其高度差别很大。

没错
回复

使用道具 举报

17465#
发表于 2022-7-22 21:14:36 | 只看该作者
mdyblog 发表于 2022-7-22 19:02
完整包中带的有中英文HELP  (PECMD.exe.437.lang为英文HELP); 纯英文系统上, 默认就是英文界面。
SE ...

#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

call GetDpiPercent
call @Page1

_sub Page1,w347 h297,,,,,, %ScaleCMD%
        swin swin1:Win1:-SwinMain1,l0 t0 w347 h205,,0x100
_end

_sub Win1,w347 h205,,,,:0xFFFFFF,, %ScaleCMD%
    envi @this.bkcolor=0x000000*
    envi @Win1.bkcolor=0x000000
_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子窗口的背景颜色

点评

_sub Win1,W347H205,,,,,, %ScaleCMD% ENVI @this.bkcolor=0xFF* _end  详情 回复 发表于 2022-7-22 21:37
回复

使用道具 举报

17466#
 楼主| 发表于 2022-7-22 21:37:34 | 只看该作者
826773297 发表于 2022-7-22 21:14
#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1


_sub Win1,W347H205,,,,,, %ScaleCMD%
     ENVI @this.bkcolor=0xFF*
_end

点评

#code=950T936 envi^ EnviMode=1 envi^ ForceLocal=1 call GetDpiPercent call @Page1 _sub Page1,w347 h297,,,,,, %ScaleCMD% envi @Page1.bkcolor=0x000000 swin swin1:Win1:-SwinMain1,l0  详情 回复 发表于 2022-7-22 21:49
回复

使用道具 举报

17467#
发表于 2022-7-22 21:49:25 | 只看该作者
mdyblog 发表于 2022-7-22 21:37
_sub Win1,W347H205,,,,,, %ScaleCMD%
     ENVI @this.bkcolor=0xFF*
_end

#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

call GetDpiPercent
call @Page1

_sub Page1,w347 h297,,,,,, %ScaleCMD%
    envi @Page1.bkcolor=0x000000
        swin swin1:Win1:-SwinMain1,l0 t10 w347 h205,,0x100
_end

_sub Win1,W347H205,,,,:0x000000,, %ScaleCMD%
_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


有一条白线

点评

[attachimg]505020[/attachimg]  详情 回复 发表于 2022-7-22 22:48
代码有问题。 用文字,具体 说说 要达到什么样的效果。  详情 回复 发表于 2022-7-22 22:40
回复

使用道具 举报

17468#
 楼主| 发表于 2022-7-22 22:40:56 | 只看该作者
826773297 发表于 2022-7-22 21:49
#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

代码这样写,有问题。
用文字,具体 说说 要达到什么样的效果。
回复

使用道具 举报

17469#
 楼主| 发表于 2022-7-22 22:48:59 | 只看该作者
826773297 发表于 2022-7-22 21:49
#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

  1. #code=950T936
  2. ENVI^ EnviMode=1
  3. ENVI^ ForceLocal=1

  4. call GetDpiPercent
  5. call @Page1

  6. _sub Page1,W347H205,,,,:0x0020C0,, %ScaleCMD%
  7.      ENVI @this.bkcolor=0x0020C0* //窗口透明
  8.    swin swin1:Win1:-SwinMain1,l0 t0 w347 h205,,0x100
  9. _end

  10. _sub Win1,W347H205,,,,,, %ScaleCMD%
  11.      ENVI @this.bkcolor=0x0020C0*    //SWIN透明
  12.    ITEM ITEM1,L5T5W100H20,ITEM1  //控件不透明
  13. _end

  14. _sub GetDpiPercent *
  15.          call $user32.dll,SetProcessDPIAware
  16.          call $--ret:hdc user32.dll,GetDC,#0
  17.          call $--ret:LogPixels Gdi32.dll,GetDeviceCaps,#%hdc%,#90
  18.          //ENVI LogPixels=120
  19.          set ScaleCMD=-scalef:%LogPixels% -scale:%LogPixels%
  20. _end
复制代码

点评

#code=950T936 envi^ EnviMode=1 envi^ ForceLocal=1 SET &::WM_MOUSELEAVE=0x02A3 SET &::WM_MOUSEENTER=0x1000 call GetDpiPercent call @Page1 _sub Page1,w347 h297,,,,,, %ScaleCMD% swin  详情 回复 发表于 2022-7-23 08:49
我是想拼接swin窗口,设计一个暗黑主题的完整窗口 labe标签能用envi命令设置颜色吗  详情 回复 发表于 2022-7-23 08:31
回复

使用道具 举报

17470#
发表于 2022-7-23 08:31:06 | 只看该作者

我是想拼接swin窗口,设计一个暗黑主题的完整窗口

labe标签能用envi命令设置颜色吗
回复

使用道具 举报

17471#
发表于 2022-7-23 08:49:55 | 只看该作者

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

_sub Page1,w347 h297,,,,,, %ScaleCMD%
        swin swin1:Win1:-SwinMain1,l0 t10 w347 h205,,0x100
_end

_sub Win1,W347H205,,,,,, %ScaleCMD%
    LABE LABE1,L68T87W187H83,LABE1,,0xffffff#0x000000
        ENVI @this.MSG=%&WM_MOUSEENTER%:ENVI @this.bkcolor=0xC0C0C0*
    ENVI @this.MSG=%WM_MOUSELEAVE%:ENVI @this.bkcolor=0xFFFFFF*
_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


labe命令如果设置颜色,鼠标移动到labe标签位置时,会阻碍我操作win1的鼠标移动和点击事件



回复

使用道具 举报

17472#
发表于 2022-7-23 09:54:41 | 只看该作者
M大神能否加个参数如果不可以最大化 就彻底不显示最大化按钮 如右图

点评

不要标题。 然后, 左上角 自己放 最小化 关闭 按钮。  详情 回复 发表于 2022-7-23 16:58
回复

使用道具 举报

17473#
发表于 2022-7-23 13:38:17 | 只看该作者

点评

新版  详情 回复 发表于 2022-7-23 20:58
回复

使用道具 举报

17474#
发表于 2022-7-23 16:53:11 | 只看该作者
pecmd搞一个duilib画界面,更清晰
回复

使用道具 举报

17475#
 楼主| 发表于 2022-7-23 16:58:22 | 只看该作者
smss 发表于 2022-7-23 09:54
M大神能否加个参数如果不可以最大化 就彻底不显示最大化按钮 如右图

不要标题。
然后, 左上角 自己放 最小化 关闭 按钮。

点评

_SUB WIN1,W516H444,新窗口1, ENVI @WIN1.bkcolor=0xF1F1F1 SWIN Swin1:Page1,L52T48W426H343,, _END _SUB Swin1,W426H343,wifi,,, ENVI @this.bkcolor=0xFFFFFF _END WIN1 pecmd的颜色不  详情 回复 发表于 2022-7-23 21:22
回复

使用道具 举报

17476#
 楼主| 发表于 2022-7-23 20:58:19 | 只看该作者
回复

使用道具 举报

17477#
发表于 2022-7-23 21:22:02 | 只看该作者
mdyblog 发表于 2022-7-23 16:58
不要标题。
然后, 左上角 自己放 最小化 关闭 按钮。

_SUB WIN1,W516H444,新窗口1,
    ENVI @WIN1.bkcolor=0xF1F1F1
    SWIN Swin1:Page1,L52T48W426H343,,
_END
_SUB Swin1,W426H343,wifi,,,
    ENVI @this.bkcolor=0xFFFFFF
_END
WIN1



pecmd的颜色不太对劲,总是不标准



点评

_SUB WIN1,W516H444,新窗口1, ENVI @WIN1.bkcolor=0xF1F1F1 SWIN Swin1:Page1,L52T48W426H343,, _END _SUB Page1,W426H343,wifi,,, ENVI @this.bkcolor=0xFFFFFF _END WIN1 [attachimg]  详情 回复 发表于 2022-7-23 21:42
回复

使用道具 举报

17478#
发表于 2022-7-23 21:23:01 | 只看该作者
0xffffff应该是标题栏那种很白很白的颜色,现在变成了灰色
回复

使用道具 举报

17479#
 楼主| 发表于 2022-7-23 21:42:48 | 只看该作者
826773297 发表于 2022-7-23 21:22
_SUB WIN1,W516H444,新窗口1,
    ENVI @WIN1.bkcolor=0xF1F1F1
    SWIN Swin1:Page1,L52T48W426H343, ...

_SUB WIN1,W516H444,新窗口1,
     ENVI @WIN1.bkcolor=0xF1F1F1
     SWIN Swin1:Page1,L52T48W426H343,,
_END
_SUB Page1,W426H343,wifi,,,
     ENVI @this.bkcolor=0xFFFFFF
_END
WIN1

点评

不过这个命令好像要改,暂时不管它了  详情 回复 发表于 2022-7-24 08:29
win11系统下颜色不对  详情 回复 发表于 2022-7-24 08:28
回复

使用道具 举报

17480#
发表于 2022-7-24 08:28:40 | 只看该作者
mdyblog 发表于 2022-7-23 21:42
_SUB WIN1,W516H444,新窗口1,
     ENVI @WIN1.bkcolor=0xF1F1F1
     SWIN Swin1:Page1,L52T48W426H34 ...

win11系统下颜色不对
回复

使用道具 举报

17481#
发表于 2022-7-24 08:29:36 | 只看该作者
mdyblog 发表于 2022-7-23 21:42
_SUB WIN1,W516H444,新窗口1,
     ENVI @WIN1.bkcolor=0xF1F1F1
     SWIN Swin1:Page1,L52T48W426H34 ...

不过这个命令好像要改,暂时不管它了
回复

使用道具 举报

17482#
发表于 2022-7-24 09:33:42 | 只看该作者
hhhhaoao
回复

使用道具 举报

17483#
发表于 2022-7-24 10:10:14 | 只看该作者
请教一下M大,RAMD 指令有什么依赖呢?
我在 WinRE 环境下,用指令 RAMD ImDisk,L513,NTFS,B:,WIT_Backup 创建 B 盘不成功。

点评

完整的PECMD.EXE IMDISK压根没装,一个相关文件都没有。 如果 要装, 得装正确。  详情 回复 发表于 2022-7-24 10:18
回复

使用道具 举报

17484#
 楼主| 发表于 2022-7-24 10:18:26 | 只看该作者
Anson4 发表于 2022-7-24 10:10
请教一下M大,RAMD 指令有什么依赖呢?
我在 WinRE 环境下,用指令 RAMD ImDisk,L513,NTFS,B:,WIT_Backup  ...

完整的PECMD.EXE即可
IMDISK压根没装,一个相关文件都没有。
如果 要装, 得装正确。

点评

#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,,  详情 回复 发表于 2022-7-24 18:30
回复

使用道具 举报

17485#
发表于 2022-7-24 18:30:54 | 只看该作者
mdyblog 发表于 2022-7-24 10:18
完整的PECMD.EXE即可
IMDISK压根没装,一个相关文件都没有。
如果 要装, 得装正确。

#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,,0x100
_end
_sub Win1,W350H400,,,,,, %ScaleCMD%
swin swin2:Win2:-SwinMain2,l0 t0 w350 h400,,
_END
_sub Win2,W350H400,,,,,, %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


我为什么可以在WIN1子窗口滚动win2子窗口

回复

使用道具 举报

17486#
发表于 2022-7-24 18:31:54 | 只看该作者
#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,,0x100
_end
_sub Win1,W350H400,,,,,, %ScaleCMD%
swin swin2:Win2:-SwinMain2,l0 t0 w350 h100,,
_END
_sub Win2,W350H50,,,,,, %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

鼠标滚动有点问题
回复

使用道具 举报

17487#
发表于 2022-7-24 18:36:10 | 只看该作者
#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,W350H50,,,,,, %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窗口缝隙,上下滚动后就没有白线了
回复

使用道具 举报

17488#
发表于 2022-7-24 21:12:11 | 只看该作者
#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子窗口滚动试试,我写的无线连接器就是被这个bug害了,m大快修理一下

点评

下载最新版。 为了应付 不恰当的滚动条设置, 修改程序, 搞出副作用了。 改回去了。 看来, 不能随便改PECMD了, 优先WCS恰当,尽量不修改PECMD(免得带出副作用)。 [attachimg]505079[/attachimg]  详情 回复 发表于 2022-7-24 22:25
回复

使用道具 举报

17489#
发表于 2022-7-24 21:31:40 | 只看该作者
m大出手把它给治一治,这bug太烦了
回复

使用道具 举报

17490#
 楼主| 发表于 2022-7-24 22:25:00 | 只看该作者
826773297 发表于 2022-7-24 21:12
#code=950T936
ENVI^ EnviMode=1
ENVI^ ForceLocal=1

下载最新版。
为了应付 不恰当的滚动条设置, 修改程序, 搞出副作用了。
改回去了。 看来, 不能随便改PECMD了, 优先WCS恰当,尽量不修改PECMD(免得带出副作用)。

点评

好的  详情 回复 发表于 2022-7-25 08:02
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-5-22 13:23

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表