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

mdyblog

527104427 发表于 2022-7-22 12:24
我已经放弃挣扎了。本来界面做好了，但发现有些功能实在是实现不了。

更改DPI 调用SetDpi.EXE

826773297

mdyblog 发表于 2022-7-22 12:52
更改DPI 调用SetDpi.EXE

我的pecmd有支持dpi v2吗

826773297

527104427 发表于 2022-7-22 12:24
我已经放弃挣扎了。本来界面做好了，但发现有些功能实在是实现不了。

我卡在dpi上了，我也妥协了，直接不调用api，使用pecmd默认窗口，模糊就模糊点吧

826773297

什么时候内置smbios功能，我们普通人要用pecmd读取smbios很难，一本说明书都几十上百页，还要自己调用api又要计算

红毛樱木

826773297 发表于 2022-7-22 13:21
什么时候内置smbios功能，我们普通人要用pecmd读取smbios很难，一本说明书都几十上百页，还要自己调用api又 ...

内置了，得搞多少变量出来让你用啊  。。。

826773297

红毛樱木 发表于 2022-7-22 13:23
内置了，得搞多少变量出来让你用啊  。。。

m大肯定有办法

mdyblog

826773297 发表于 2022-7-22 12:57
我卡在dpi上了，我也妥协了，直接不调用api，使用pecmd默认窗口，模糊就模糊点吧

SCRN 可以直接获得DPI

SCRN -desk  W,H,,,,dpiX,dpiY,scaleX,scaleY
MESS. dpy: %dpiX% %dpiY% Scale: %scaleX% %scaleY%  WH: %W% %H%

826773297

mdyblog 发表于 2022-7-22 13:58
SCRN 可以直接获得DPI

SCRN -desk  W,H,,,,dpiX,dpiY,scaleX,scaleY

窗口设置dpi后，控件大小发生了改变，labe透明标签高度为20，字体大小是8的情况下显示不全

826773297

控件不会根据dpi自适应，另外我还发现，调用了这个api:
CALL $--ret:&DPI_Aware user32.dll,SetProcessDPIAware

然后把窗口dpi设置为175，窗口反而小了
按理来说dpi越大，窗口也应该放大才对

caocaofff

m大，有没有现成的英文版帮助说明的PECMD呢

mdyblog

caocaofff 发表于 2022-7-22 18:59
m大，有没有现成的英文版帮助说明的PECMD呢

完整包中带的有中英文HELP  （PECMD.exe.437.lang为英文HELP）； 纯英文系统上， 默认就是英文界面。
SET LC_ALL=437
PECMD HELP

caocaofff

mdyblog 发表于 2022-7-22 19:02
完整包中带的有中英文HELP  （PECMD.exe.437.lang为英文HELP）； 纯英文系统上， 默认就是英文界面。
SE ...

好的

Anson4

826773297 发表于 2022-7-22 14:10
窗口设置dpi后，控件大小发生了改变，labe透明标签高度为20，字体大小是8的情况下显示不全

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

826773297

Anson4 发表于 2022-7-22 21:02
我觉得最别扭的还是 LIST 控件，在不同的DPI下其高度差别很大。

没错

826773297

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子窗口的背景颜色

mdyblog

826773297 发表于 2022-7-22 21:14
#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

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

826773297

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


有一条白线

mdyblog

826773297 发表于 2022-7-22 21:49
#code=950T936
envi^ EnviMode=1
envi^ ForceLocal=1

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

mdyblog

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. 
   
5. call GetDpiPercent
   
6. call @Page1
   
7. 
   
8. _sub Page1,W347H205,,,,:0x0020C0,, %ScaleCMD%
   
9.      ENVI @this.bkcolor=0x0020C0* //窗口透明
   
10.    swin swin1:Win1:-SwinMain1,l0 t0 w347 h205,,0x100
    
11. _end
    
12. 
    
13. _sub Win1,W347H205,,,,,, %ScaleCMD%
    
14.      ENVI @this.bkcolor=0x0020C0*    //SWIN透明
    
15.    ITEM ITEM1,L5T5W100H20,ITEM1  //控件不透明
    
16. _end
    
17. 
    
18. _sub GetDpiPercent *
    
19.          call $user32.dll,SetProcessDPIAware
    
20.          call $--ret:hdc user32.dll,GetDC,#0
    
21.          call $--ret:LogPixels Gdi32.dll,GetDeviceCaps,#%hdc%,#90
    
22.          //ENVI LogPixels=120
    
23.          set ScaleCMD=-scalef:%LogPixels% -scale:%LogPixels%
    
24. _end

复制代码

826773297

mdyblog 发表于 2022-7-22 22:48

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

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

826773297

mdyblog 发表于 2022-7-22 22:48

#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的鼠标移动和点击事件

smss

M大神能否加个参数如果不可以最大化 就彻底不显示最大化按钮 如右图

smss

826773297

pecmd搞一个duilib画界面，更清晰

mdyblog

smss 发表于 2022-7-23 09:54
M大神能否加个参数如果不可以最大化 就彻底不显示最大化按钮 如右图

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

mdyblog

smss 发表于 2022-7-23 13:38

新版

826773297

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的颜色不太对劲，总是不标准

826773297

0xffffff应该是标题栏那种很白很白的颜色，现在变成了灰色

mdyblog

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

826773297

mdyblog 发表于 2022-7-23 21:42
_SUB WIN1,W516H444,新窗口1,
     ENVI @WIN1.bkcolor=0xF1F1F1
     SWIN Swin1:Page1,L52T48W426H34 ...

win11系统下颜色不对