一個(gè)軟件專業(yè)與否,在細(xì)微之處體現(xiàn)的淋漓精致。目前軟件開發(fā)基于組件思想,使得軟件開發(fā)像搭積木一樣。軟件模塊的封裝分兩種,一種是業(yè)務(wù)功能的封裝(我稱它為組件),一種是表現(xiàn)界面的封裝(我稱它為控件)。
組件的封裝因?yàn)榕c界面無關(guān),所以問題大多在接口數(shù)據(jù)類型上。控件與界面有關(guān),很多朋友在開發(fā)控件的時(shí)候很有激情,看著自己的東東在什么環(huán)境下面都可以使用,很是有成就感。然而稍有專業(yè)水準(zhǔn)的人應(yīng)該會發(fā)現(xiàn)這不是一件完美的事情,因?yàn)閙icrosoft沒有為activex控件處理加速鍵消息處理,以至于導(dǎo)致很多問題:up、down、left、right、home、end、tab、backspace等在自己的控件里面不起作用,編輯框無法刪除字符,tab鍵無法跳轉(zhuǎn)到下一個(gè)控件上。我是深受其害,以至于有一年多不敢染指控件開發(fā)。這個(gè)問題很多人遇見過,但是沒見到誰給出個(gè)好的方法來。
對于上面的問題,微軟也意識到,但是一直沒有給出完美的一套方案,只是在msdn里面零星提到一下,給出了一個(gè)基于mfc activex的解決辦法。由于我一般使用atl開發(fā)控件,所以那個(gè)辦法我一直未曾感到滿意過。上網(wǎng)搜索不少,一般都不能解決實(shí)質(zhì)性問題,有甚者把鉤子都搬出來,個(gè)人覺得沒有那么大必要,畢竟我一般不敢將hook技術(shù)應(yīng)用在大軟件里面。我依據(jù)個(gè)人摸索,基本解決了大部分問題,當(dāng)然任何事情都是不完美的,拿出來為了一個(gè)csdn朋友需要,也為了大家提出更好的解決辦法。
本篇以vs2005環(huán)境,實(shí)做出atl標(biāo)準(zhǔn)控件、復(fù)合控件,測試環(huán)境分別為VB6? VC6(dialog) .net(C#) IE。分別展示出問題以及解決辦法,記憶里vb控件在mfc里面也有問題(好像tab鍵出不去,需要一個(gè)隱藏控件),對于此本文不做探討,如有需要,下次在說。
這里先談?wù)勛隹丶倪x擇:標(biāo)準(zhǔn)控件分無窗口和有窗口。
如果只設(shè)計(jì)圖形操作,不需要窗口,可以通過IOleObject來解決位置以及大小,這樣可以減少不少控件的尺寸。
對于有窗口的控件,一般情況是一個(gè)做好的窗口類,為了封裝以使用于各種開發(fā)環(huán)境而依附到atl控件窗口上面(至于不創(chuàng)建窗口可否?當(dāng)然可以,這里不想講,牽扯太遠(yuǎn))。對于這種控件個(gè)人認(rèn)為最好只依附一個(gè)窗口,如果想依附幾個(gè)窗口,請使用復(fù)合控件。
復(fù)合控件類似一個(gè)對話框面板,你可以托放控件到面板上,這種控件問題比較少,我推薦使用窗口控件的人選擇此類型,盡管dll尺寸可能大點(diǎn)。
標(biāo)準(zhǔn)帶窗口控件問題:
我制作的控件是一個(gè)edit創(chuàng)建在atl窗口上面,不作任何處理在各種環(huán)境里面使用情況如下:
VB6:Tab正常,但是在atl控件的時(shí)候,edit無Caret(不知道怎么翻譯)閃爍,并且鼠標(biāo)點(diǎn)擊在里面后有Caret,然而按下左鍵跑到上一個(gè)tab窗口上面去了。
VC6:比VB6好一點(diǎn),左右鍵是好的,也是tab后無Caret閃爍
.net:和VB6情況一樣,無語,難怪.net和VB6一樣好用(^_^,沒有瞧不起.net,我深受VC之苦,好想用.net開發(fā)界面)
IE:和VB6大致一樣就是左右鍵全部不起作用。
處理方法:
1、添加SetFocuse消息處理:
LRESULT?CATLFullCtrl_Step2::OnSetFocus(UINT?uMsg,?WPARAM?wParam,?LPARAM?lParam,?BOOL
&
?bHandled)

{
????
//
?TODO:?在此添加消息處理程序代碼和/或調(diào)用默認(rèn)值
????LRESULT?lRes?
=
?CComControl
<
CATLFullCtrl_Step2
>
::OnSetFocus(uMsg,?wParam,?lParam,?bHandled);
????
if
?(m_bInPlaceActive)

????
{
????????DoVerbUIActivate(
&
m_rcPos,??NULL);
????????
if
(
!
IsChild(::GetFocus()))

????????
{
????????????m_wndEdit.SetFocus();
????????}
????}
????
return
?lRes;
}
當(dāng)atl控件接到focuse消息后,把焦點(diǎn)給edit窗口。還不夠,接著是主要的:
2、重載加速鍵需函數(shù):
讓我們先看看微軟做了什么:
BOOL?PreTranslateAccelerator(LPMSG?/*pMsg*/,?HRESULT&?/*hRet*/)
????{
????????return?FALSE;
????}靠,明顯不作為嘛!什么都不處理,怎么可能正確啊......
我來試一試:
BOOL?CATLFullCtrl_Step2::PreTranslateAccelerator(LPMSG?pMsg,?HRESULT&?hRet)
{
????//?TODO:?在此添加專用代碼和/或調(diào)用基類
????if(pMsg->message?==?WM_KEYDOWN?&&
????????(pMsg->wParam?==?VK_LEFT?||
????????pMsg->wParam?==?VK_RIGHT?||
????????pMsg->wParam?==?VK_UP?||
????????pMsg->wParam?==?VK_DOWN))
????{
????????hRet?=?S_FALSE;
????????return?TRUE;
????}
????return?__super::PreTranslateAccelerator(pMsg,?hRet);
}為什么??還記得前面的問題嘛??Tab鍵好像是好的,就是左右鍵不正確啊,^_^,這里我假設(shè)處理拉,你就別跳別處了好嘛???
下面來看看各種環(huán)境里面使用情況:
VB6:正常
VC6:正常
.net:正常
IE:第一此tab到控件焦點(diǎn)控件外框,點(diǎn)擊編輯框之后下次就是好的了。不曉得是不是我沒有處理好。
復(fù)合控件的問題:
我制作的復(fù)合控件是一個(gè)按鈕、一個(gè)復(fù)選框、一個(gè)編輯框、一個(gè)單選框。不作任何處理在各種環(huán)境里面使用情況如下:
VB6:沒大毛病,就是默認(rèn)焦點(diǎn)在復(fù)合控件第一個(gè)tab窗口上(假象,你切換一下窗口就恢復(fù)到正常情況下,但是復(fù)合控件button里面按鈕的默認(rèn)黑色外框還有,我實(shí)在處理不好),且編輯框輸入漢語是亂碼(好像與Unicode編碼有關(guān))。
VC6:很完美,還是自產(chǎn)自消比較對路。
.net:和VB6情況差不多,但是沒有亂碼問題。
IE:問題不大,你自己看看,實(shí)在不好描述,我保證不影響使用。
處理方法:
1、亂碼問題,不要問我為什么,我也是瞎蒙的,^_^。不過你要想知道為什么復(fù)合控件問題這么少,我建議你看看基類CComCompositeControl的PreTranslateAccelerator實(shí)現(xiàn),暈,那么多判斷代碼,還有問題,咳,不說了。
STDMETHOD(TranslateAccelerator)(LPMSG?pMsg)
????{
????????if(pMsg->message?==?WM_CHAR)
????????{
????????????return?S_FALSE;
????????}
????????HRESULT????????hr????=?NO_ERROR;
????????hr?=?IOleInPlaceActiveObjectImpl<CATLCompoundCtrl_Step2>::TranslateAccelerator(pMsg);
????????if(hr?!=?S_OK)
????????{
????????????CComQIPtr<IOleControlSite,&IID_IOleControlSite>????spCtrlSite(m_spClientSite);
????????????if(spCtrlSite)
????????????{
????????????????hr?=?spCtrlSite->TranslateAccelerator(pMsg,?0);
????????????????if(hr?!=?S_OK)
????????????????{
????????????????????IsDialogMessage(pMsg);
????????????????}
????????????}
????????}
????????return?S_OK;
????}主要解決亂碼的就是那段判斷WM_CHAR消息返回S_FALSE的代碼。下面那段代碼借用microsoft的,呵呵。
2、VB6那個(gè)假象focus處理,這個(gè)我是在VB6里面做的,就是強(qiáng)制focus到form第一個(gè)tab窗口上,焦點(diǎn)倒是對了,但是復(fù)合控件上面那個(gè)按鈕的默認(rèn)黑色外框在tab一個(gè)輪回后才正常。處理代碼:
Private?Sub?Form_Activate()
????Command1.SetFocus
End?Sub

3、.net以及IE的我沒有解決掉那個(gè)假focus,望高人支招。
下面來看看各種環(huán)境里面使用情況:
VB6:那個(gè)默認(rèn)按鈕黑色外框沒解決掉,其他ok
VC6:完美
.net:假focuse沒有解決掉
IE:假focuse沒有解決掉
下面來總結(jié)一下:
好像沒有一種萬能辦法可以解決掉所有情況下的問題,我嘗試很久總結(jié)出這些東西不知道算不算好的辦法,但是還算是消除了一些關(guān)鍵問題,不知道是否使用你遇到的問題。.net控件好像很方便也沒有那么多資源切換啊,加速鍵消息處理問題啊。沒辦法,我們這些it“馬崽”很多事情是不由自己的。
遺留問題:
假focuse、默認(rèn)按鈕黑色外框沒有處理好。
代碼下載說明:包括activex控件、VB6測試、VC6測試、.net測試。
posted on 2006-11-17 21:40
萬連文 閱讀(2375)
評論(1) 編輯 收藏 引用 所屬分類:
ATL