線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:957
推到 Plurk!
推到 Facebook!

用delphi怎樣控制其它程式界面縂在屏幕的最上層

答題得分者是:hagar
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-04-12 15:37:33 IP:61.152.xxx.xxx 未訂閱
有一應用程式,需要它總是在屏幕的最上方,如何用delphi時時check它是否在最上面,如何讓它在最上面。 發表人 - breeze_1 於 2004/04/12 15:39:02
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-04-12 16:40:17 IP:202.39.xxx.xxx 未訂閱
1.找出該應用程式的 window handle 2.以 GetForeGroundWindow 找出前景的 window handle 3.比較 1. 與 2. 所得的 window handle 是否相同 4.以 SetWindowPos API 來將該應用程式放在最上方: SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE); -- He just never quits.
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-04-12 16:59:27 IP:61.152.xxx.xxx 未訂閱
謝謝,順便問一下把delphi程式圖標放在任務欄上,像時間那樣的,怎樣給圖標加右鍵菜單。
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-04-12 17:14:36 IP:202.39.xxx.xxx 未訂閱
1.作法請搜尋本站的 TrayIcon Demo 程式 2.要 delphi 程式出現 PopupMenu, 只要拉一個 TPopupMenu 元件 然後將 TForm 的 PopupMenu 屬性設為該 TPopupMenu 元件 -- He just never quits.
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-04-12 17:24:14 IP:61.152.xxx.xxx 未訂閱
hagar 你好,我的意思是把form隱藏,像oicq那樣只顯示在任務欄右邊,並且能給圖標加上右鍵菜單。
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-04-12 17:29:36 IP:202.39.xxx.xxx 未訂閱
小弟回答的就是這樣啊 demo 程式參考天使大人的範例: http://delphi.ktop.com.tw/topic.php?topic_id=146 -- He just never quits.
系統時間:2024-05-14 12:35:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!