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

linkin129

wjgyz740526 发表于 2015-12-22 15:06
我想查找所有分区特定文件并列表出来该怎么做？用ifex的话变量只能保存最后一个符合条件的值啊，怎样得到一 ...

ENVI$ &&TAB=09

CALL Page1

_SUB Page1,W347H255,文件列表,
    LIST LIST1,L2T124W320H18,2.请选择:,,,0x100
    ENVI &&hTITLE=+30:序号%&TAB%+210:文件位置%&TAB%
    TABL hTABL,L18T20W240H100,%&hTITLE%,,0x10040
    THREAD* FORX1

_END


_SUB FORX1
   
   
  FORX /S \*.INI,f,0,TEAM ENVI @LIST1.ADD=%f% |ENVI @hTABL.VAL=0*;%&TAB%%f%
     
_END


这样吗？

wjgyz740526

linkin129 发表于 2015-12-22 19:10
ENVI$ &&TAB=09

CALL Page1

谢谢你的回复！我想选择下拉列表某个项退出的时候，弹出消息框提示文字信息怎么做？谢谢


ENVI$ &&NL=0a
ENVI$ &&TAB=01

CALL Page1

_SUB Page1,W280H255,文件列表,
    LABE hLABE,L18T15W150H18,查找到的文件列表:
    LIST LIST1,L18T124W240H18,请选择文件:,TEAM ENVI @V=%LIST1%,请选择文件:,0x100
    ENVI &&hTITLE=*300:文件位置%&TAB%
    TABL hTABL,L18T40W240H65,%&hTITLE%,%&hDATA%,0x121C0
    THREAD* FORX1
_END

_SUB FORX1
  FORX /S \*.inf,f,0,TEAM ENVI @list1.ADD=%f% |ENVI @hTABL.VAL=0*;%&TAB%%f%   
_END


MESS LIST1=%V% @DEBUG#OK


这样并不显示被选择的项啊

linkin129

wjgyz740526 发表于 2015-12-23 15:43
谢谢你的回复！我想选择下拉列表某个项退出的时候，弹出消息框提示文字信息怎么做？谢谢

ENVI$ &&NL=0a
ENVI$ &&TAB=01
SET  ::WM_LBUTTONDOWN=0x0201 //单击

CALL Page1

_SUB Page1,W280H255,文件列表,
    LABE hLABE,L18T15W150H18,查找到的文件列表:,,
    LIST LIST1,L18T124W240H18,请选择文件:,CALL SEL,,0x10100
    ENVI &&hTITLE=*300:文件位置%&TAB%
    TABL hTABL,L18T40W240H65,%&hTITLE%,%&hDATA%,0x121C0
    THREAD* FORX1

_END

_SUB FORX1
  ENVI @LIST1.VAL=
  FORX /S:2 \*.inf,f,0,TEAM ENVI @list1.ADD=%f% |ENVI @hTABL.VAL=0*;%&TAB%%f%  
  ENVI @LIST1.isel=1
_END


_SUB SEL

MESS %LIST1% @DEBUG#OK

_END

这样？

linkin129

SET  ::WM_RBUTTONDOWN=0x0204

MYWINDOW1
_SUB MYWINDOW1,W553H397,PECMD2012功能演示,
    EDIT EDIT1,L39T22W297H30,,,
    ENVI &ATAB=+250:路径
    ITEM ITEM1,L363T21W60H30,ITEM1,CALL BROWTag,
    TABL TABL1,L64T83W375H127,%&ATAB%,,0x1c0
    ENVI @TABL1.MSG=_%&WM_RBUTTONDOWN%: CALL DELTAB
    LABE RBUTTON,L103T240W310H15,,,
    ENVI @RBUTTON.Visable=0
_END

_SUB BROWTag
BROW Tag,*C:\Windows,请选择一个目录
ENVI @EDIT1=%Tag%
ENVI @TABL1.VAL=0*;%Tag%
_END

_SUB DEL
    FILE -force %1
    ENVI @FILEClearOnTimer=0
    ENVI @RBUTTON.Visable=0
_END

_SUB DELTAB
     ENVI &&DELFILE=
     ENVI &K=0
     ENVI @TABL1.Sel=?&&Sel
     ENVI @TABL1.Val=?%&Sel%.1;&DELFILE
     ENVI @RBUTTON.Visable=1
     TIME FILEClearTimer,1000, CALL FILEClearOnTimer
     CALL FILEClearOnTimer
     THREAD* DEL %&DELFILE%
     ENVI @TABL1.Val=-%&Sel%
_END

_SUB FILEClearOnTimer

   ENVI @RBUTTON=正在卸载镜像，请稍候...  已用时间: %&K%秒
   CALC &K= %&K% + 1

_END

老大，这个右键表格删除大些目录，好卡没响应

wjgyz740526

linkin129 发表于 2015-12-23 16:41
ENVI$ &&NL=0a
ENVI$ &&TAB=01
SET  ::WM_LBUTTONDOWN=0x0201 //单击

谢谢谢谢！！！！

mdyblog

linkin129 发表于 2015-12-23 16:54
SET  ::WM_RBUTTONDOWN=0x0204

MYWINDOW1

和程序无关吧。
是系统在卡，此时所有的程序都卡。  如果是台式机， 会看到硬盘灯狂闪。

linkin129

mdyblog 发表于 2015-12-23 17:34
和程序无关吧。
是系统在卡，此时所有的程序都卡。  如果是台式机， 会看到硬盘灯狂闪。

linkin129

右键表格弹出菜单怎么写？

mdyblog

linkin129 发表于 2015-12-23 18:41
右键表格弹出菜单怎么写？

CALL @--popmenu   <菜单名>
有实例。

wjgyz740526

这个帖子层数太高，找东西超级不便，有个层数和内容的帮助文档就好了

linkin129

怎么判断是否主分区？

mdyblog

linkin129 发表于 2015-12-25 18:42
怎么判断是否主分区？

PART 命令。

1) MBR
2) 物理号: 1,2,3,4
3) 类型： 不是空分区（0x00）， 不是 扩展分区（0x05  0x0F）

linkin129

MYWINDOW1
_SUB MYWINDOW1,W415H324,PECMD2012功能演示,
    EDIT EDIT1,L138T57W60H30,,,
    ITEM ITEM2,L138T155W60H30,开始,CALL 开始,
    ITEM ITEM1,L218T157W60H30,停止,CALL 停止,
_END

_SUB 开始
       ENVI J=0
       TIME Timer,200,CALL OnTimer
       CALL OnTimer   
_END

_SUB 停止
   
    ENVI @Timer=0
   
_END

_SUB OnTimer

     ENVI @EDIT1=%J%秒

     CALC J= %J% + 0.2#1

_END
第一次能停止，之后就停止不了，时间越走越快

mdyblog

linkin129 发表于 2015-12-26 20:34
MYWINDOW1
_SUB MYWINDOW1,W415H324,PECMD2012功能演示,
    EDIT EDIT1,L138T57W60H30,,,

定时器的创建一般在窗口。
你这样， 每次创建一个。引起混乱。

1. MYWINDOW1
   
2. _SUB MYWINDOW1,W415H324,PECMD2012功能演示,
   
3.     EDIT -3D -VCENTER -CENTER EDIT1,L138T57W60H30,,,
   
4.     ITEM ITEM2,L138T155W60H30,开始,CALL 开始,
   
5.     ITEM ITEM1,L218T157W60H30,停止,CALL 停止,
   
6.     TIME -t:0 Timer,200,CALL OnTimer
   
7.     ENVI J=0
   
8. _END
   
9. 
   
10. _SUB 开始
    
11.     ENVI J=0
    
12.     ENVI @Timer=200   
    
13. _END
    
14. 
    
15. _SUB 停止
    
16.     ENVI @Timer=0
    
17. _END
    
18. 
    
19. _SUB OnTimer
    
20.     ENVI @EDIT1=%J%秒
    
21.     CALC J= %J% + 0.2##1
    
22. _END

复制代码

linkin129

mdyblog 发表于 2015-12-27 07:13
定时器的创建一般在窗口。
你这样， 每次创建一个。引起混乱。

我看别人写的，有时会创建在子程序里的

mdyblog

linkin129 发表于 2015-12-27 09:42
我看别人写的，有时会创建在子程序里的

那样 会出幺蛾子 的。

linkin129

表格-随机选择多个行，取内容
只有一列的

怎么写？

mdyblog

linkin129 发表于 2015-12-28 15:31
表格-随机选择多个行，取内容
只有一列的

循环 一行一行地取。

linkin129

mdyblog 发表于 2015-12-28 17:19
循环 一行一行地取。

是不是先取所选择的行号？再一行行取内容？
那我取的行号是1 3 7 9 MESS 看是连续的，怎么分开一个一个数？

mdyblog

linkin129 发表于 2015-12-28 17:55
是不是先取所选择的行号？再一行行取内容？
那我取的行号是1 3 7 9 MESS 看是连续的，怎么分开一个一 ...

ENVI LNS=1 2 7 9
FORX * %LNS%,LN,
{
  MESS %LN%
}

linkin129

mdyblog 发表于 2015-12-28 18:55
ENVI LNS=1 2 7 9
FORX * %LNS%,LN,
{

好的，谢谢了

红毛樱木

老大，我那个盘符问题没希望了么。。。


23号的 73new


LOG.zip (4.18 KB, 下载次数: 1)

2015-12-29 18:47 上传

点击文件名下载附件
下载积分: 无忧币 -2

mdyblog

红毛樱木 发表于 2015-12-29 18:47
老大，我那个盘符问题没希望了么。。。

你给我一个做好的演示（调试）问题的PE吧。

红毛樱木

mdyblog 发表于 2015-12-30 05:06
你给我一个做好的演示（调试）问题的PE吧。

上次测试f模式没有盘符的03pe就行。要是没有了我再传

wjgyz740526

M大，给个用sed去除变量空格的示例吧？

假设变量%txt%=aa bb 1 2 3，怎样用sed处理成aabb123？

ling3882688

wjgyz740526 发表于 2015-12-30 16:53
M大，给个用sed去除变量空格的示例吧？

假设变量%txt%=aa bb 1 2 3，怎样用sed处理成aabb123？

1. SET &&txt=aa bb 1 2 3
   
2. SED V=0,  *,,%txt%
   
3. MESS %V%

复制代码

以下代码是我当时提问的，可以替换多余的空格并保留一个空格，可以作为参考理解下具体的替换逻辑：

1. SET &&txt=1a   2c ef    tq      3e
   
2. SED V=0,   *, ,%txt%
   
3. MESS %V%

复制代码

wjgyz740526

ling3882688 发表于 2015-12-30 17:01
以下代码是我当时提问的，可以替换多余的空格并保留一个空格，可以作为参考理解下具体的替换逻辑： ...

谢谢

WAIGO

M大您好！PECMD2012.1.88.05.73New-1223 版又丢失盘符了。



而且 "Windows 工具" 也变成 "Administrative Tools" ，不知道今天能否改好？Win10 PE 准备明天更新……

mdyblog

2010WAIGO 发表于 2015-12-31 07:44
M大您好！PECMD2012.1.88.05.73New-1223 版又丢失盘符了。

73Stable丢吗？

你这不是原来那个8 PE吧。
原来那个8PE，用73New丢吗？

PE链接发过来吧。

WAIGO

mdyblog 发表于 2015-12-31 07:57
73Stable丢吗？

你这不是原来那个8 PE吧。

1、73Stable 没用，现在下载测试。

2、不是 8.1 ，是 Win10 PE x64，用 11.29 的版本没有问题。发布地址如下：

http://pan.baidu.com/s/1o7nzMVC