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

bahmo · 发表于 2012-2-14 13:51:18

可否再增加 NAME 命令

格式：NAME <变量名><=><文件名>
功能：返回指定文件名的基本名(无目录、无扩展名)
参数：■变量名: 用于保存命令返回值的变量名
■文件名: 被检测的合法的文件名称
示例：NAME aFileName=C:\WINDOWS\NOTEPAD.EXE 或 NAME aName=%CurDir%\Path1\Path2\FileName
备注：※指定的文件名为分区的根目录时，该命令的返回结果为空值；
※示例1的返回结果为"NOTEPAD"，示例2的返回结果为"FileName"。

bahmo · 发表于 2012-2-15 08:48:56

原帖由 2012abc19701 于 2012-2-14 16:00 发表

挺好的.

│格式│FNAM
├──┼────────────────────
│功能│返回指定"文件名"的主名(不带"."和扩展名)
├──┼────────────────────
│ ...

回報bug
-----------------------------------------------------------------
FNAM aFileName=C:\WINDOWS\NOTEPAD.EXE
MESS %aFileName% @11 #ok
-----------------------------------------------------------------

\NOTEPAD
多了\

[ 本帖最后由 bahmo 于 2012-2-15 08:50 编辑 ]

bahmo · 发表于 2012-2-15 09:56:53

原帖由 2012abc19701 于 2012-2-15 09:43 发表
[img]http://bbs.wuyou.net/images/default/agree.gifhttp://bbs.wuyou.net/images/default/agree.gif[/img]http://bbs.wuyo ...

U22版還是有問題

-----------------------------------------------------------------
FNAM aFileName=C:\WINDOWS\NOTEPAD.EXE
MESS %aFileName% @11 #ok
-----------------------------------------------------------------

\NOTEPAD
多了\

只要NOTEPAD

SCRN命令也有問題
當前設定為1024*768

卻得出1032*1032

SIZE iSize=b:\PECMD.exe
MESS %iSize% @11 #ok

卻得出%iSize%

[ 本帖最后由 bahmo 于 2012-2-15 11:11 编辑 ]

bahmo · 发表于 2012-2-15 14:11:05

├───┼──┼──────────────────────────────────────────────┤
│    │格式│PINT <檔案名稱>,[選單名稱|選單標識|#字元串ID]                                              │
│    ├──┼──────────────────────────────────────────────┤
│    │功能│將已經存在的 EXE 或 LNK 檔案 Pin 到"開始功能表"或"工作列"，NT5.x系統只支援"開始功能表"。 │
│    ├──┼──────────────────────────────────────────────┤
│    │參數│■檔案名稱: 已經存在的 EXE 或 LNK 檔案名，要帶路徑和副檔名，支援環境變數解釋；             │
│    │ │■選單名稱: EXE、LNK檔案右鍵選單對應的字元串，如"釘選到 [開始] 功能表"、"釘選到工作列"    │
│    │ │■選單標識: 可以用"StartMenu"或"TaskBand"，前者表示Pin到"開始功能表"，後者表示Pin到"工作列" │
│    │ │■字元串ID: 數值，"釘選到 [開始] 功能表"、"釘選到工作列"在SHELL32.DLL資源字元串的序號    │
│    ├──┼──────────────────────────────────────────────┤
│'PINT'│示例│PINT %WinDir%\Regedit.LNK,釘選到 [開始] 功能表或 PINT %WinDir%\Regedit.EXE,釘選到工作列 │
│    │ │PINT %WinDir%\System32\calc.exe,#5381       或 PINT %WinDir%\System32\calc.LNK,#5386    │
│    │ │PINT %WinDir%\System32\PECMD.EXE,StartMenu    或 PINT %WinDir%\Regedit.EXE,TaskBand       │
│    ├──┼──────────────────────────────────────────────┤
│    │備註│※該指令需系統功能的支援，在一些精簡系統或XP、2003系統中可能因功能的精簡或欠缺而無法實現；  │
│    │ │※"選單名稱"、"選單標識"和"字元串ID"3個參數只取其一，當3個參數均省略時表示Pin到"開始功能表" │
│    │ │  這3個參數因系統而異，建議使用系統的選單名稱，如 "釘選到 [開始] 功能表(&U)" 來表示；    │
│    │ │※"選單名稱"原理上可以用系統右鍵選單的其它項目，來實現一定的功能，如用"開啟(&O)"來開啟檔案；│
│    │ │※"選單標識"中的"TaskBand"也可用"TaskBar"代替，如 PINT %WinDir%\Regedit.EXE,TaskBar       │
│    │ │※6個示例中，左邊3個表示 Pin 到"開始功能表"，右邊3個表示 Pin 到"工作列"。                │
├───┼──┼──────────────────────────────────────────────┤

bahmo · 发表于 2012-2-15 15:08:28

CHEK 複選框控件之複選框標題為置中顯示，如何改為靠左？

bahmo · 发表于 2012-2-16 10:50:03

原帖由 2012abc19701 于 2012-2-15 15:24 发表

目前没有这个选项.

CALL @子程式
_SUB 子程式,W210H114,新視窗,,
CHEK 選取框1,L8T15W200H20,測試pecmd選取框1,,0
CHEK 選取框2,L9T45W200H20,選取框2,,0
_END

左邊為pecmd 4.0的執行畫面，右邊為U27的執行畫面

CHEK 的標題一個靠左，一個居中

bahmo · 发表于 2012-2-16 12:46:24

原帖由 2012abc19701 于 2012-2-16 11:58 发表

U28

子程式
_SUB 子程式,W350H260,新視窗PECMD2012.1.28,,
      CHEK 選取框1,L8T15W200H20,測試pecmd選取框1,,0
      CHEK 選取框2,L8T45W200H20,選取框2,,0
      RADI R1,L8T70W200H20,卸 ...

再報個bug

CALL @子程式
_SUB 子程式,W350H260,新視窗PECMD2012.1.28,,
      CHEK 選取框 1,L8T15W200H20,測試pecmd選取框1,,0
      CHEK 選取框 2,L8T45W200H20,選取框2,,0
      RADI R1,L8T70W200H20,卸載,ENVI @Group1=%RadioButton1%,1,1
      ITEM B1,L8T108W300H54,aaa,EXEC explorer.exe,%SystemRoot%\explorer.exe
      ITEM B1,L8T170W300H54,aaa,EXEC explorer.exe
      ENVI @選取框 1.Check=1
      ENVI @選取框 2.Check=1
_END

發現 ENVI @選取框 1.Check=1 無動作
因為選取框 1 中間有空白

PECMD 4.0下測試沒有問題，U28無動作

bahmo · 发表于 2012-2-16 14:23:57

原帖由 2012abc19701 于 2012-2-16 13:41 发表

U29:

子程式  aaaaaaaaaa bbbbbbbbb
_SUB 子程式,W350H314,新視窗,,
      CHEK 選取框 1,L8T15W200H20,測試pecmd選取框1,,0
      CHEK 選取框 2,L9T45W200H20,選取框2,,0
      RADI R1 ...

一切只是為了好看，才會有空格的變數
運用在底下的複選框標題
ACDSEE [看圖軟體]
ACDSEE[看圖軟體]

再幫我看看附件為何在選取複選框時會不定時出現錯誤畫面(pecmd 4.0下ok)

[ 本帖最后由 bahmo 于 2012-2-16 14:26 编辑 ]

bahmo · 发表于 2012-2-17 09:14:45

CALL @子程式
_SUB 子程式,W350H100,新視窗PECMD2012.1.28,,
      CHEK 選取框 1,L8T15W200H20,測試pecmd選取框1,,0
      CHEK 選取框 2,L8T45W200H20,選取框2,,0
      ENVI @選取框 1.Check=1
      ENVI @選取框 2.Check=1
      IFEX $%選取框 2.Check%=1,MESS 選取框 2=%選取框 2.Check% @ #OK
_END

PECMD 4.0可以用
IFEX $%選取框 2.Check%=1
來判斷選取框的狀態，U31無法用IFEX判斷

bahmo · 发表于 2012-2-17 14:49:27

原帖由 2012abc19701 于 2012-2-17 13:24 发表

又是空格变量名的原因。
U33 可以。
137233

U32試過把空格拿掉也不行，
U33 OK了，感謝了

但是
CALL @子程式
_SUB 子程式,W350H100,新視窗PECMD2012.1.28,,
      CHEK 選取框1,L8T15W200H20,測試pecmd選取框1,,0
      CHEK 選取框2,L8T45W200H20,選取框2,,0
      ENVI TEST=選取框2
      ENVI @%TEST%.Check=1
      IFEX $%選取框2.Check%=1,MESS 法一 @ #OK
      IFEX $%%TEST%.Check%=1,MESS 法二 @ #OK
      MESS %%TEST%.Check% @ #OK
_END

U33還無法使用
IFEX $%%TEST%.Check%=1,MESS 法二 @ #OK
執行畫面顯示
法一
選取框2.Check%

PECMD 4.0是OK的
執行畫面顯示
法一
法二
1

若能解決就可以考慮把4.0換掉了...

[ 本帖最后由 bahmo 于 2012-2-17 15:20 编辑 ]

bahmo · 发表于 2012-2-20 11:09:37

回報U42
FORX的錯誤

envi WimCount=0
FORX WIMMOD\*.WIM,WimName,0,CALL WimCountSub
mess %WimCount% @ #ok
_SUB WimCountSub
CALC #WimCount=%WimCount%+1
_END

WIMMOD 下共有56個 *.WIM
但 FORX 只找出55個??

[ 本帖最后由 bahmo 于 2012-2-20 11:12 编辑 ]

bahmo · 发表于 2012-2-20 14:08:59

原帖由 2012abc19701 于 2012-2-20 13:57 发表

U43
----------------------------

envi WimCount=0
FORX WIMMOD\*.WIM,WimName,0,CALL WimCountSub
mess %WimCount% @ #ok
_SUB WimCountSub
CALC #WimCount=%WimCount%+1
mess %WimCount%:%WimName% @ #ok
_END

U43是可以找到56個，但找到的第一個卻為空白??

bahmo · 发表于 2012-2-20 14:38:34

envi WimCount=0
FORX C:\*.EXE,WimName,0,CALL WimCountSub
mess %WimCount% @ #ok

_SUB WimCountSub
CALC #WimCount=%WimCount%+1
mess %WimCount%:%WimName% @ #ok
_END

C:\底下有3個*.EXE
c:\arcldr.exe
c:\arcsetup.exe
c:\opera.exe

FORX第一個找到卻為C:\

[ 本帖最后由 bahmo 于 2012-2-20 14:40 编辑 ]

bahmo · 发表于 2012-2-21 16:57:03

原帖由 2012abc19701 于 2012-2-20 18:58 发表

U43
U45
－－－－－－－－－－－－－－

感謝樓主的修正bug，載入wim模組的腳本終於測試ok了!!

bahmo · 发表于 2012-2-23 17:17:01

U50在help畫面上下捲動時會有重疊影像
U49無此問題

OS:WIN 2000

附件 50.7Z為 AVI檔

bahmo · 发表于 2012-3-1 14:25:10

提個建議
如例
FORX %CurDir%\Path1\*.DLL,AnyDLL,0,CALL $%AnyDLL%

FORX在搜尋*.DLL時，可否排序

如DOS 的 FOR
for /f "delims=" %i in ('dir /b/s/on %CurDir%\Path1\*.DLL') do call "%i"

bahmo · 发表于 2012-3-2 11:51:03

原帖由 2012abc19701 于 2012-3-2 09:43 发表
[quote]原帖由 bahmo 于 2012-3-1 14:25 发表

CallAllDllSort.WCS:

_SUB CallAllDllSort
TEAM ENVI &&I=1|ENVI &&MSG=| ENVI &&COUNT=0| ENVI &&AnyDLL= //定义 ...

範例中變數I沒設1，造成無窮迴圈

FORX變通的方式，我之前的作法是將排序過的檔名存成.TXT
用READ *.TXT 取代 FORX

[ 本帖最后由 bahmo 于 2012-3-2 12:15 编辑 ]

bahmo · 发表于 2012-3-2 21:58:30

U65F的LSTR有問題
LSTR WimName=6,google.wim
mess %WimName% @ #OK

應該是取得google
但卻取得google.wim

bahmo · 发表于 2012-3-5 12:59:40

MESS的按鈕型式有六種
圖示卻只有Warning Query(?)一種

[ 本帖最后由 bahmo 于 2012-3-5 13:42 编辑 ]

bahmo · 发表于 2012-3-8 11:59:54

回報一個BUG+一個不相容

_SUB 子程式,W328H80,新視窗,,
ITEM 按鈕1,L7T10W74H24,打開桌面,EXEC %Desktop%,,0
EDIT 編輯框1,L84T11W220H20,,,1
_END

CALL @子程式

在PECMD 4.0 EDIT的密碼輸入框會顯示 *
EXEC %Desktop% 會開啟桌面
U67H下EDIT的密碼輸入框不會顯示 *
需下EXEC explorer.exe %Desktop% 才會開啟桌面

bahmo · 发表于 2012-3-8 14:14:38

原帖由 2012abc19701 于 2012-3-8 13:16 发表

我这显示 * 啊
138441

OS:WIN 2000
不顯示*

bahmo · 发表于 2012-3-9 09:52:00

回報EDIT的差異
1.
_SUB 子程式,W328H100,新視窗,,
      LABE Label1,L86T43W115H25,,,0xFF,20
      EDIT 編輯框1,L84T11W220H20,TEST,ENVI @Label1=%編輯框1%,1
_END

CALL @子程式

OS:WIN 2000下
U67K：EDIT編輯框輸入完資料後按ENTER無動作，必須按滑鼠連續點擊
PECMD 4.0滑鼠連續點擊是反白內容，按ENTER執行動作

2.
_SUB 子程式,W328H100,新視窗,,
      EDIT 編輯框1,L84T11W220H20,TEST
_END

CALL @子程式

OS:WIN 2000下
PECMD 4.0 游標停在第一個T
U67K是反白TEST

[ 本帖最后由 bahmo 于 2012-3-9 10:06 编辑 ]

bahmo · 发表于 2012-3-11 08:13:10

回報LOAD的BUG
============================================
如果檔案路徑第1個字元是"\"，則搜尋所有磁碟指定目錄中的檔案
============================================

將U67T的PECMD複製到D:\

存在C:\XXYYXX\1.TXT

PECMD LOAD \XXYYXX\1.TXT無動作

測試發現貌似只會搜尋PECMD所在磁碟指定目錄中的檔案

也就是說若存在D:\XXYYXX\1.TXT

PECMD.EXE就ok

[ 本帖最后由 bahmo 于 2012-3-11 08:17 编辑 ]

bahmo · 发表于 2012-3-15 08:10:17

原帖由 diannao338 于 2012-3-15 07:56 发表
SCRN ScrW,ScrH
find $%ScrW%>800,mess 大于800宽%ScrW%高%ScrH%!mess 小于800宽%ScrW%高%ScrH%
这判断哪里出问题了?明明大于的,结果是小于

TEXT ┎──────────────┒#0xFFC0CB L50 T100 R ...

把FIND改為IFEX

IFEX
■數值變數 $%數值變數名%<比較符>數值或數值變數名
FIND
■環境變數 $%環境變數名%<比較符>環境變數值，環境變數的比較是不區分大小寫的。

bahmo · 发表于 2012-4-10 13:12:46

回報在WIN 2000繁中版
PECMDBIG5
是亂碼

[ 本帖最后由 bahmo 于 2012-4-10 13:20 编辑 ]

bahmo · 发表于 2012-4-10 16:19:27

原帖由 2012abc19701 于 2012-4-10 14:03 发表

繁体好像有好几个编码。一般说的是BIG5。还有香港编码。
你那是香港、新加坡码？什么编码？

台灣BIG5

bahmo · 发表于 2013-5-23 12:55:14

自PECMD2012.1.75.1-130314-1之後就不支援 win 2000??

"無法找到程序輸入點 GetNativeSystemlnfo (在動態連結程式庫 KERNEL32.dll ）。"

bahmo · 发表于 2013-5-23 16:14:29

PECMD2012.1.79N-130510-04 WIN 2000 --> 無錯誤訊息、無help畫面
PECMD2012.1.78-130410-04. WIN 2000 --> OK

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

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

回复 #250 2012abc19701 的帖子