设为首页收藏本站
开启辅助访问 切换到宽版

无忧启动论坛

 找回密码
 注册
搜索
无忧启动论坛»论坛 › ::启动制作:: › PE讨论区 › [更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线 ...
系统gho:最纯净好用系统下载站投放广告、加入VIP会员，请联系 微信:wuyouceo
1 ...612613614615616617618619... 650下一页
返回列表 发新帖
楼主: mdyblog
打印 上一主题 下一主题

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

    [复制链接]
18451#
发表于 2023-4-14 13:02:23 | 只看该作者
加入VIP会员，获无忧币，赠积分，送勋章，下载无限制，获论坛最高级会员权限 !
感谢！支持一下！
回复

使用道具 举报

smss
18452#
发表于 2023-4-14 16:26:04 | 只看该作者
望M大加点动画和界面圆角，十分期待
回复

使用道具 举报

smss
18453#
发表于 2023-4-14 16:28:18 | 只看该作者
作者头发浓密度：100%
回复

使用道具 举报

18454#
发表于 2023-4-14 21:06:32 | 只看该作者
PECMD 创建的编辑框控件, 怎么设置其输入字符数量限制?

点评

datbik189
有示例代码, 自己研究. SET &EM_SETLIMITTEXT=0x00C5 SET &WM_COMMAND=0x0111 SET &EN_CHANGE=0x0300 WIN1 _SUB WIN1,W344H249,测试字符数, SET &EDIT2_V=汉字 EDIT -vcenter &EDIT2,L75T70W  详情 回复 发表于 2023-4-15 08:16
回复

使用道具 举报

18455#
发表于 2023-4-14 22:32:12 | 只看该作者
本帖最后由 caocaofff 于 2023-4-15 16:10 编辑

弱弱的问一下，怎么用SOCK命令检测开放的端口？比如开了FTP就是21端口，怎么知道当前的端口侦听状态？
回复

使用道具 举报

18456#
发表于 2023-4-15 08:16:11 | 只看该作者
Bluebells 发表于 2023-4-14 21:06
PECMD 创建的编辑框控件, 怎么设置其输入字符数量限制?

有示例代码, 自己研究.

SET &EM_SETLIMITTEXT=0x00C5
SET &WM_COMMAND=0x0111
SET &EN_CHANGE=0x0300

WIN1

_SUB WIN1,W344H249,测试字符数,
    SET &EDIT2_V=汉字
    EDIT -vcenter &EDIT2,L75T70W161H30,%&EDIT2_V%,,
    SET &EDIT2.maxb=6
    ENVI @&EDIT2.ID=?;&&EDIT2_ID
    CALC -base=16 #&&EDIT2_CHANGE=%&EN_CHANGE% * 0x10000  + %&EDIT2_ID%   //低16位，控件ID   //高16位,操作码
    ENVI @this.MSG=_%&WM_COMMAND%::&&wp,&&lp, CALL OnCommand   //捕捉内容改变
_END

_SUB OnCommand
    IFEX $%EDIT2_CHANGE%=%&wp%,  CALL OnEDIT2_CHANGE
_END

_SUB OnEDIT2_CHANGE
    STRL -m &&len=%&EDIT2%
    IFEX $%&len%>%&EDIT2.maxb%, ENVI @&EDIT2=%&EDIT2_V%!  SET EDIT2_V=%&EDIT2%
_END

//SetLimitText 控件名 字符数(非字节数)
_SUB SetLimitText
     ENVI @%1.ID=?&&CWid
     ENVI @@SENDMSG=%&CWid%:%&EM_SETLIMITTEXT%;%2
_END

点评

Bluebells
谢了！已解决  发表于 2023-4-15 09:39
回复

使用道具 举报

Zap
18457#
发表于 2023-4-15 13:26:38 | 只看该作者
这能翻译下吗
h删除文字ttps://blog.51cto.com/u_14617575/2746140

评分

参与人数 1无忧币 +5 收起 理由
smss + 5 淡定

查看全部评分

回复

使用道具 举报

smss
18458#
发表于 2023-4-15 18:13:35 | 只看该作者
  1. @echo off
  2. set "evt=wevtutil qe system /c:1 /rd:true /f:text"
  3. for /f "tokens=2" %%a in ('%evt% "/q:*[System[(EventID=12)]]"^|find /i "date:"') do echo 本次开机：%%a
  4. for /f "tokens=2" %%a in ('%evt% "/q:*[System[(EventID=13)]]"^|find /i "date:"') do echo 上次关机：%%a
  5. pause
复制代码

这能翻译下吗

点评

mdyblog
ENVI$ &&NL=0D 0A ENVI$ &&NLd=0D ENVI$ &&NLa=0A EXEC* &&V=*wevtutil qe system /c:1 /rd:true /f:text "/q:*[System[(EventID=12)]]" SED -ni &&V1=1,{.*%&NLa%}{[^%&NL%]*Date:[^%&NL%]*}{%&NLd%.*},\2,%&V  详情 回复 发表于 2023-4-27 19:06
回复

使用道具 举报

smss
18459#
发表于 2023-4-15 22:53:31 | 只看该作者
5大帮助解决了
回复

使用道具 举报

18460#
发表于 2023-4-16 12:29:41 | 只看该作者
41
回复

使用道具 举报

18461#
发表于 2023-4-16 13:20:07 | 只看该作者
厉害！
回复

使用道具 举报

18462#
发表于 2023-4-18 10:31:49 | 只看该作者
本帖最后由 conlin888 于 2023-4-18 10:49 编辑
mdyblog 发表于 2023-4-7 17:46
用 ResEdit  或 ResHacker  编辑 PECMD.EXE ，在保存。
内置 帮助文档  是  

老大,当拖入文件时, 如何让窗口激活和获得焦点,这样就可以直接编辑了.

现在的问题是: 选择文件的时候, 窗口处于非激活状态和失去焦点, 拖入文件后, 窗口还是处于非激活状态和失去焦点.

TEAM ENVI^ ENVIMODE=1| ENVI^ FORCELOCAL=1
MYWINDOW1

_SUB MYWINDOW1,W360H440,PECMD2012功能演示,
    EDIT EDIT1,L20T34W317H177,请拖入文件,,0x100
    ENVI @EDIT1.MSG=0x0233::&&wp,&&lp,Team envi @this.pos=::::4
_END

回复

使用道具 举报

18463#
发表于 2023-4-18 11:16:05 | 只看该作者
mdyblog 发表于 2023-4-7 17:46
用 ResEdit  或 ResHacker  编辑 PECMD.EXE ，在保存。
内置 帮助文档  是  

找到解决办法了, 红字代码改为 envi @this.pos=::::::1:1
回复

使用道具 举报

18464#
发表于 2023-4-22 21:56:07 | 只看该作者
pecmd的进度条能不能加个功能，让窗口在任务栏也有进度动画？

点评

红毛樱木
那个用api就行了，示例代码里有。 Taskbar开头的文件好像  详情 回复 发表于 2023-4-23 01:09
回复

使用道具 举报

tcm
18465#
发表于 2023-4-23 01:00:52 | 只看该作者
谢谢分享
回复

使用道具 举报

18466#
发表于 2023-4-23 01:09:12 来自手机 | 只看该作者
caocaofff 发表于 2023-4-22 21:56
pecmd的进度条能不能加个功能，让窗口在任务栏也有进度动画？

那个用api就行了，示例代码里有。
Taskbar开头的文件好像

点评

caocaofff
TaskbarPbr-tst.wcs  详情 回复 发表于 2023-4-23 19:28
回复

使用道具 举报

18467#
发表于 2023-4-23 19:28:36 | 只看该作者
红毛樱木 发表于 2023-4-23 01:09
那个用api就行了，示例代码里有。
Taskbar开头的文件好像

TaskbarPbr-tst.wcs
回复

使用道具 举报

18468#
发表于 2023-4-24 20:26:47 | 只看该作者
PECMD2012.1.88.05.94Stable-230422.7z
正式版发布了

点评

Anson4
上一个正式版好像是 PECMD2012.1.88.05.86Stable-220331G 吧，一年多以前了。  详情 回复 发表于 2023-5-4 15:14
回复

使用道具 举报

18469#
 楼主| 发表于 2023-4-27 19:06:59 | 只看该作者
smss 发表于 2023-4-15 18:13
这能翻译下吗

ENVI$ &&NL=0D 0A
ENVI$ &&NLd=0D
ENVI$ &&NLa=0A
EXEC*  &&V=*wevtutil qe system /c:1 /rd:true /f:text "/q:*[System[(EventID=12)]]"
SED -ni &&V1=1,{.*%&NLa%}{[^%&NL%]*Date:[^%&NL%]*}{%&NLd%.*},\2,%&V%
MESS. 本次开机：%&V1%
EXEC*  &&V=*wevtutil qe system /c:1 /rd:true /f:text "/q:*[System[(EventID=13)]]"
SED -ni &&V2=1,{.*%&NLa%}{[^%&NL%]*Date:[^%&NL%]*}{%&NLd%.*},\2,%&V%
MESS. 上次关机%&V2%

点评

freesoft00
http://bbs.wuyou.net/forum.php?mod=redirect&goto=findpost&ptid=425765&pid=4898285&fromuid=1345  详情 回复 发表于 2023-4-27 19:41
回复

使用道具 举报

18470#
发表于 2023-4-27 19:41:57 | 只看该作者
mdyblog 发表于 2023-4-27 19:06
ENVI$ &&NL=0D 0A
ENVI$ &&NLd=0D
ENVI$ &&NLa=0A

http://bbs.wuyou.net/forum.php?m ... 85&fromuid=1345
回复

使用道具 举报

18471#
发表于 2023-4-27 21:36:00 | 只看该作者
谢谢提供分享
回复

使用道具 举报

smss
18472#
发表于 2023-4-28 08:47:45 | 只看该作者
https://wwi.lanzoui.com/b0wh8vjc
最新版本BUG 当PNG图片编译入EXE后 CHEK 开关无法正常显示
例
CHEK -scale:(50*96/12)<116:50>:%开关% 给朕连网,L375T194W46H20,,REGI $HKU\.DEFAULT\Software\Smss\\连网=%给朕连网.Check%

感恩M大辛勤付出 这需要大量时间和精力 我可以知道你的联系方式吗？你已经帮助我很多次了

点评

红毛樱木
#1|PNG 这种格式。0422支持了的呀。  详情 回复 发表于 2023-4-28 11:53
回复

使用道具 举报

18473#
发表于 2023-4-28 11:53:07 | 只看该作者
smss 发表于 2023-4-28 08:47
https://wwi.lanzoui.com/b0wh8vjc
最新版本BUG 当PNG图片编译入EXE后 CHEK 开关无法正常显示
例

#1|PNG
这种格式。0422支持了的呀。

点评

smss
ENVI 开关=#3|PNG CHEK 0422异常上个版本正常  发表于 2023-4-28 15:16
回复

使用道具 举报

smss
18474#
发表于 2023-4-28 15:24:14 | 只看该作者
//注意 Image1是个EXE的图标 加载会卡 详见https://pecmd.net/thread-522.htm

IMAG Image1,L6T422W73H73,%MyName%,call ico,
CALL setSOURCE

_SUB setSOURCE
        FORX * &L8 &L9,i,
        {*        FNAM-ext &tmpNAME=%&fir%
                FIND $%&tmpNAME%=,ENVI &fir=
                ENVI @%i%.SEL=%&fir%
                ^FIND $%%%i%%%<>%%&fir%%,ENVI @%i%.ADDSEL=%&fir%       
                FIND $%i%=&L8,TEAM WAIT 555|ENVI @Image1.update=:::::;%&fir%#0       
        }
_END

点评

红毛樱木
贴一个最小能重现问题的代码呗。 你这代码也不知道怎么玩  详情 回复 发表于 2023-4-28 15:45
回复

使用道具 举报

18475#
发表于 2023-4-28 15:45:36 | 只看该作者
smss 发表于 2023-4-28 15:24
//注意 Image1是个EXE的图标 加载会卡 详见https://pecmd.net/thread-522.htm

IMAG Image1,L6T422W73H73 ...

贴一个最小能重现问题的代码呗。
你这代码也不知道怎么玩   

点评

泮安宁
红毛大佬，list控件怎么设置字体啊，最新的这一版我用envi还是不能设置  详情 回复 发表于 2023-4-29 21:08
smss
有时正常有时卡  发表于 2023-4-28 16:29
smss
这随手写个就行  发表于 2023-4-28 16:19
回复

使用道具 举报

18476#
 楼主| 发表于 2023-4-28 20:23:57 | 只看该作者
826773297 发表于 2023-4-14 12:47
pecmd能否创建无边框的圆角窗口，最好是带阴影效果

要么系统本身支持，如XP视觉。
要么自己做，窗口用蒙板。直角扣掉。

点评

conlin888
M大，如何向一个后台窗口发送组合键，比如向一个隐藏的CMD发送ctrl+c. 网上查到的资料如下，怎么转成PECMD脚本。 正确发送的code:(Alt+A) PostMessage(hWnd,WM_SYSKEYDOWN,VK_MENU,0); PostMessage(hWnd,WM_  详情 回复 发表于 2023-5-19 19:14
826773297
M大什么时候入驻PECMD社区 pecmd.net  详情 回复 发表于 2023-4-30 11:47
826773297
https://blog.csdn.net/rmxming/article/details/11661365 https://www.cnblogs.com/strive-sun/p/14247220.html https://blog.csdn.net/weixin_34364071/article/details/92546647 无边框窗口设置阴影效果有办法  详情 回复 发表于 2023-4-30 11:30
826773297
https://learn.microsoft.com/zh-cn/windows/apps/desktop/modernize/apply-rounded-corners https://blog.csdn.net/weixin_33878457/article/details/92954789 https://blog.csdn.net/dxm809/article/details/114  详情 回复 发表于 2023-4-30 11:23
回复

使用道具 举报

smss
18477#
发表于 2023-4-29 06:06:55 | 只看该作者
写个桌面可以移动插件，该插件被限制在屏幕的最上方，可左右拖拽移动，无法上下移动,拖拽下拉该控件有回弹的效果,松开可以切换壁纸。右键点击该插件可以弹出菜单。
以下是基本的C++程序代码思路和一些需要用到的API函数 可以翻译下吗

  1. 1. 定义控件的初位置和大小，设置控件可以接受鼠标消息。

  3. ```
  4. HWND hWnd = CreateWindowEx(WS_EX_TRANSPARENT, L"STATIC", L"", WS_VISIBLE | WS_CHILD | WS_CLIPSIBLINGS | SS_BITMAP, xPos, yPos, width, height, parentHwnd, NULL, hInstance, NULL);
  5. SetWindowLongPtr(hWnd, GWL_STYLE, GetWindowLongPtr(hWnd, GWL_STYLE) | WS_EX_ACCEPTFILES);
  6. ```

  8. 2. 实现鼠标拖拽和回弹的效果。需要用到以下函数：GetCursorPos、SetCursorPos、ScreenToClient、ClientToScreen、SendMessage、ReleaseCapture。

  10. ```
  11. case WM_LBUTTONDOWN:
  12. {
  13.     ReleaseCapture();
  14.     POINT cursorPos;
  15.     GetCursorPos(&cursorPos);
  16.     ScreenToClient(hWnd, &cursorPos);
  17.     SetCursorPos(cursorPos.x, cursorPos.y);
  18.     m_bDragging = true;
  19.     m_ptStartPos = cursorPos;
  20.     break;
  21. }
  22. case WM_MOUSEMOVE:
  23. {
  24.     if (m_bDragging)
  25.     {
  26.         POINT cursorPos;
  27.         GetCursorPos(&cursorPos);
  28.         ScreenToClient(hWnd, &cursorPos);

  30.         int delta = cursorPos.x - m_ptStartPos.x;
  31.         int xPos = m_ptStartPos.x + delta;
  32.         xPos = max(xPos, 0);
  33.         RECT rcParent;
  34.         GetClientRect(GetParent(hWnd), &rcParent);
  35.         xPos = min(xPos, rcParent.right - m_width);

  37.         SetWindowPos(hWnd, NULL, xPos, m_yPos, 0, 0, SWP_NOACTIVATE | SWP_NOSIZE | SWP_NOZORDER);

  39.         m_ptLastPos = cursorPos;
  40.     }
  41.     break;
  42. }
  43. case WM_LBUTTONUP:
  44. {
  45.     if (m_bDragging)
  46.     {
  47.         m_bDragging = false;
  48.         if (m_ptLastPos.x < m_ptStartPos.x)
  49.         {
  50.             SendMessage(hWnd, WM_MOVE, 0, MAKELPARAM(0, m_yPos));
  51.         }
  52.         else if (m_ptLastPos.x > m_ptStartPos.x)
  53.         {
  54.             SendMessage(hWnd, WM_MOVE, 0, MAKELPARAM(rcParent.right - m_width, m_yPos));
  55.         }
  56.     }
  57.     break;
  58. }
  59. ```

  61. 3. 实现切换壁纸的功能，需要用到以下函数：SystemParametersInfo。

  63. ```
  64. case WM_LBUTTONUP:
  65. {
  66.     if (m_bDragging)
  67.     {
  68.         // ...

  70.         // 切换壁纸
  71.         m_bmpIndex = (m_bmpIndex + 1) % m_bmpList.size();
  72.         SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, (PVOID)m_bmpList[m_bmpIndex].c_str(), SPIF_UPDATEINIFILE | SPIF_SENDWININICHANGE);

  74.         break;
  75.     }
  76. }
  77. ```

  79. 4. 实现右键菜单的弹出，需要用到以下函数：CreatePopupMenu、AppendMenu、TrackPopupMenu、DestroyMenu。

  81. ```
  82. case WM_CONTEXTMENU:
  83. {
  84.     HMENU hPopupMenu = CreatePopupMenu();
  85.     AppendMenu(hPopupMenu, MF_STRING, ID_MENU_ITEM1, L"菜单项1");
  86.     AppendMenu(hPopupMenu, MF_STRING, ID_MENU_ITEM2, L"菜单项2");
  87.     AppendMenu(hPopupMenu, MF_STRING, ID_MENU_ITEM3, L"菜单项3");
  88.     TrackPopupMenu(hPopupMenu, TPM_TOPALIGN | TPM_LEFTALIGN, ptCursor.x, ptCursor.y, 0, hWnd, NULL);
  89.     DestroyMenu(hPopupMenu);

  91.     break;
  92. }
  93. ```
复制代码

点评

826773297
回弹自己写定时器缓慢移动控件即可 右键更简单，pecmd示例就有  详情 回复 发表于 2023-4-30 11:40
826773297
这很简单  详情 回复 发表于 2023-4-30 10:50
回复

使用道具 举报

smss
18478#
发表于 2023-4-29 06:12:44 | 只看该作者
https://share.weiyun.com/3f5byXyB
效果如上

点评

826773297
_SUB WIN1,W633H344,新窗口1,,,-#: SWIN -:SWIN1,L123T50W30H30,, _END win1 _sub swin1,w30h30,,,,: IMAG IMAG1,L0T0W30H30,#1, ENVI @SWIN1.HitTest=30:30 envI @sWIN1.MSG=0x0232::&&wp,  详情 回复 发表于 2023-4-30 11:02
回复

使用道具 举报

smss
18479#
发表于 2023-4-29 20:39:07 | 只看该作者
了凡Win11_22624.1680_PE链接:https://share.weiyun.com/USJIeYYn 密码:qi8fk6
回复

使用道具 举报

18480#
发表于 2023-4-29 21:08:47 | 只看该作者
红毛樱木 发表于 2023-4-28 15:45
贴一个最小能重现问题的代码呗。
你这代码也不知道怎么玩

红毛大佬，list控件怎么设置字体啊，最新的这一版我用envi还是不能设置

点评

826773297
设置全局字体倒是可以 _SUB WIN1,W383H367,新窗口1, LIST LIST1,L144T51W60H100,LIST1, ENVI @WIN1.Font=10:微软雅黑 _END win1  详情 回复 发表于 2023-4-30 11:12
回复

使用道具 举报

1 ...612613614615616617618619... 650下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

闽公网安备 35020302032614号

GMT+8, 2025-11-1 02:47

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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