全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2172
推到 Plurk!
推到 Facebook!

在MainMenu上要使用自定的快速鍵無法隨心所欲

缺席
yes123
一般會員


發表:5
回覆:6
積分:2
註冊:2004-09-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-12-08 17:42:11 IP:220.130.xxx.xxx 訂閱
我使用的是D7,主畫面是fsMDIForm,有一元件為MainMenu1, 
MainMenu1.AutoHotKeys已設為 maManual,
MainMenu1.AutoLineReduction已設為 maManual,

要使用快速鍵雖然可以在每項的ManuItem內的shortCut有下拉式的選項可選,但並非為全部選項,
可否有方法可以在此設定自己想要的快速鍵?

也有嘗試將 MainForm 的KeyPreview設為True,並在FormKeyDown事件內
設定如下方式,但很奇怪只要MainForm內有MainMenu這些設定都會無效?

請教各位大大,可否有方法,可以使用 MainMenu又可以隨心所欲自設快速鍵的方法?

對了,使用MainMenu的功能,當進入各選單指定的程式後,內定按Esc就會離開指定的程式,
這個功能可以取消嗎?因為我的子程式不想按Esc就離開!


if ( Key= VK_F8 ) then
miMyPostItClick(self)
else
if ( Key= VK_ESCAPE ) then
btnQuitclick(self)
編輯記錄
yes123 重新編輯於 2008-12-08 18:05:31, 註解 無‧
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-12-11 08:59:31 IP:122.116.xxx.xxx 未訂閱
您好,
第一題 : 我看了一下, 內建可用的 shortcut 鍵已經很多了, 而且還可以在
menuitem 的 caption 寫類似 工具(&T) 來設 alt-t 快速鍵,
可否請您舉例一下您想設什麼快速鍵.
第二題 : 試一下 if key=vk_escape then key :=0;
------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
yes123
一般會員


發表:5
回覆:6
積分:2
註冊:2004-09-17

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-12-11 14:00:55 IP:220.130.xxx.xxx 訂閱
感謝 st33Chen 大大回覆:

第一題:已於早上自行測試出來了,例:要在某一MenuItem內設定
快速鍵(Ctrl 1),在ShortCut的下拉選項找不到,我就直接key入Ctrl 1,就可以使用了
快速鍵(ESC),在ShortCut的下拉選項找不到,我就直接key入ESC,就可以使用了

第二題:這個問題就別再提了,試到全身無力了,
搜尋程式明明沒有宣告按Esc要離開或執行什麼動作,
它就是無條件離開。
按F7一步步追踪,也無法找到觸發點,
自已另開一個專案,開類似的Form來試,卻很正常(按Esc不會有反應)。
這個問題我會再自行試試。

再次感謝 st33Chen的幫忙!!!, 感恩!!!!

系統時間:2024-05-17 16:24:54
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!