| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
ckp6250
註冊時間: 2004-07-30
文章: 1645
第 16 樓
|
 發表於: 星期五 十月 04, 2013 6:34 pm 文章主題: |
 |
|
最最簡單的方法
run tasklist > c:\a.txt
? OCCURS('A.EXE',FILETOSTR('c:\a.txt')) |
|
| 回頂端 |
|
 |
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 17 樓
|
| 發表於: 星期五 十月 04, 2013 7:23 pm 文章主題: |
|
|
FindWindow 傳回的不都是同一個hwnd值嗎?
設A.EXE的FORM1.CAPTION='XXX'
a=FindWindow(NULL,"XXX")
那另一個A.EXE的CAPTION也是'XXX"呀!
b=FindWindow(NULL,"XXX")
結果 b=a,
還是無法知道不是嗎?
jerryclt 在 星期五 十月 04, 2013 7:36 pm 作了第 1 次修改 |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 18 樓
|
| 發表於: 星期五 十月 04, 2013 7:35 pm 文章主題: |
|
|
經由 FindWindow 聯想...
也許可以利用 GetWindowText 來達到要求,
待小弟實際試試看再來報告! |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 19 樓
|
| 發表於: 星期五 十月 04, 2013 8:29 pm 文章主題: |
|
|
| ckp6250 寫到: | 最最簡單的方法
run tasklist > c:\a.txt
? OCCURS('A.EXE',FILETOSTR('c:\a.txt')) |
兄弟...您好樣兒的!!!
先給您按個讚......再蓋個章......然後來去測試! |
|
| 回頂端 |
|
|
ckp6250
註冊時間: 2004-07-30
文章: 1645
第 20 樓
|
| 發表於: 星期五 十月 04, 2013 9:14 pm 文章主題: |
|
|
既蒙謬讚，那麼再精簡成一行指令
? OCCURS('A.EXE',FILETOSTR(IIF(ExecScript("run tasklist > c:\a.txt"),'c:\a.txt',''))) |
|
| 回頂端 |
|
|
DennisTsai
註冊時間: 2005-07-26
文章: 178
第 21 樓
|
| 發表於: 星期六 十月 05, 2013 1:09 am 文章主題: |
|
|
| 最好加上大小寫轉換 |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 22 樓
|
| 發表於: 星期六 十月 05, 2013 3:01 am 文章主題: |
|
|
| ckp6250 寫到: | 既蒙謬讚，那麼再精簡成一行指令
? OCCURS('A.EXE',FILETOSTR(IIF(ExecScript("run tasklist > c:\a.txt"),'c:\a.txt',''))) |
ExecScript() 這個會有版本限制不是嗎? |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 23 樓
|
| 發表於: 星期六 十月 05, 2013 3:03 am 文章主題: |
|
|
這是必然的...
run tasklist > c:\a.txt
? OCCURS(UPPER('A.EXE'),UPPER(FILETOSTR('c:\a.txt'))) |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 24 樓
|
| 發表於: 星期六 十月 05, 2013 3:12 am 文章主題: |
|
|
這是必然的...
run tasklist > c:\a.txt
? OCCURS(UPPER('A.EXE'),UPPER(FILETOSTR('c:\a.txt'))) |
|
| 回頂端 |
|
|
ckp6250
註冊時間: 2004-07-30
文章: 1645
第 25 樓
|
| 發表於: 星期六 十月 05, 2013 6:33 am 文章主題: |
|
|
| jerryclt 寫到: |
ExecScript() 這個會有版本限制不是嗎? |
若是擔心版本限制，不然，改用這個如何呢？
? OCCURS('A.EXE',FILETOSTR(IIF(isnull(_vfp.Docmd("run tasklist > c:\a.txt"))),'c:\a.txt','')))
本廠只負責供應零件，用戶請自行依需求改裝 
ckp6250 在 星期六 十月 05, 2013 10:49 am 作了第 1 次修改 |
|
| 回頂端 |
|
|
bx1166
註冊時間: 2011-12-06
文章: 273
第 26 樓
|
| 發表於: 星期六 十月 05, 2013 10:09 am 文章主題: |
|
|
有些時候 程式師可能是不希望同一工作站 重複執行某一個程式
所以計算執行的程式數量 來加以控制
那麼第n個A.exe 一載入 發現過多的時候 就可以自行關閉
這時候FindWindow 還是比較可靠 前提是 A.exe _screen.caption 可以讀的到 |
|
| 回頂端 |
|
|
jerryclt
註冊時間: 2009-03-10
文章: 334
來自: 佛心來的
第 27 樓
|
| 發表於: 星期六 十月 05, 2013 3:26 pm 文章主題: |
|
|
其實小弟是要嚐試做相同視窗的平均寬度切割,
類似 VFP 功能快捷列中 Window -> Arrange All 的功能啦,
沒有版本或人數控制!
所以ckp老大的那行,
在前置作業上有很大的助益哩!
後頭還是需要 GetWindowText 和 SetWindowPos 來重新排列那些視窗的位置... |
|
| 回頂端 |
|
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
