請教一個自動執行的問題 |
|
尚未結案
|
|
samhum0522
一般會員   發表：26 回覆：12 積分：7 註冊：2004-11-30 發送簡訊給我 |
|
|
shinjie
資深會員  發表：12 回覆：275 積分：287 註冊：2003-03-19 發送簡訊給我 |
|
|
samhum0522
一般會員 發表：26 回覆：12 積分：7 註冊：2004-11-30 發送簡訊給我 |
shinjie大大：
您好，我剛剛試了一下這方法了
//var
//H1: Hwnd;
//begin
//WinExec('D:\ReadFFE.EXE',SW_SHOW);
//H1 := FindWindow(nil,PChar('視窗名稱'));
//PostMessage(H1, WM_KEYDOWN, VK_F3, 0); //送出快速鍵，VK_F3是測
//試鍵，可能要找一下你AP是否有 這方法似乎可行，我找過我這的AP，PLAY鈕的快速鍵是F5
但是我對Delphi不太熟，所以我不太懂這程式要怎麼改成BCB可以使用的
不知可否再麻請shinjie大大幫我說明一下。
感激不盡！！
|
|
shinjie
資深會員 發表：12 回覆：275 積分：287 註冊：2003-03-19 發送簡訊給我 |
|
|
samhum0522
一般會員 發表：26 回覆：12 積分：7 註冊：2004-11-30 發送簡訊給我 |
shinjie大大：
您好，我剛剛試了一下，程式如下
ShellExecute(NULL,NULL,"D:\\laser3.ffe",NULL,NULL,SW_SHOW);
SetForegroundWindow(Application->Handle);
HWND hwnd1=FindWindow("視窗畫面",NULL);
PostMessage(hwnd1, WM_KEYDOWN, VK_F5, 0);
PostMessage(hwnd1, WM_KEYDOWN, 70, 0);
PostMessage(hwnd1, WM_KEYUP, VK_F5, 0);
可以成功的Run，但是還是沒辦法自動執行，
請問一下視窗畫面是要輸入什麼？？(我的執行畫面如圖二所示)
另外我的postMessage()所設指令不知有錯嗎？
請shinjie大大再幫我看一下。
謝謝
|
|
shinjie
資深會員 發表：12 回覆：275 積分：287 註冊：2003-03-19 發送簡訊給我 |
HWND hwnd1=FindWindow("視窗畫面",NULL);
視窗畫面是指你執行程式的Caption，在你的程式名稱應該是Force Editor - laser3.ffe這個字串，Force Editor是固定的，後面接你所開啟的檔案名稱。
所以你可以透過搜尋所有視窗名稱符合Force Editor，應該就是你要的名稱。
或是你如果確定檔案名稱的話，也可以直接將Force Editor - 檔案名稱傳進去。以下是一些相關的連結。
找所有的視窗Caption，並尋找符合的名稱
http://delphi.ktop.com.tw/topic.php?topic_Id=56431
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19523
------
我將在茫茫人海中尋訪我唯一之靈魂伴侶。 得之；我幸。不得；我命。 |
發表時間：2005-01-27 11:10:41
IP:163.18.xxx.xxx 未訂閱
系統時間：2024-05-09 4:24:55
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |