BCB控件制作和消息处理

   　　1 前言

    作为和Delphi类似的rad(rapid application development)工具，c++ builder的强大功能不仅体现在数据库开发方面，也凸现于应用程序开发上(令人称绝的是这两方面结合得非常好)。仅就应用程序而言，要真正体现c++ builder的优势，开发出高质量的软件，则在拖拉拽放之外，尚需用到一些进阶技术。如消息处理、dll、ole、线程、sdk编程。c++ builder在这些方面都或多或少有独到的优势。此外，可以方便地制作自定义控件，也是c++ builder的一大特色和高级功能。本文将通过制作一个标题棒在窗口左边的对话框控件，来示范一些c++ builder中关于控件制作和消息处理的概念，同时涉及到一点sdk编程。我们将要制作的是一个对话框，就如同opendialog等一样，一调用其execute()方法，就弹出一个如图一所示的窗口。这个窗口的标题棒位于左方，绿色，文字走向为由下而上的90度字形，其功能和一般的标题棒相同，可以將鼠标移至该处来移动该窗口。
    首先来完成这个窗口，然后用它来制作对话框控件。

    图一
    2 利用wm_nchittest消息制作竖直标题的窗口
    .wm_nchittest消息
    c++builder将某些windows消息封装于事件(event)中,但无法囊括所有消息，如wm_nc**** 系列消息。wm_nchittest消息发生于游标(cursor)移动或鼠标按下、释放时，返回值指示目前游标所在位置，如返回hthscroll表示处于水平滚动条内，返回htcaption表示处于标题棒内(参见win32 sdk help)。其参数XPos、ypos分别表示游标的x、y坐标(相对于屏幕左上角),分别对应于lparam的低字和高字。如果拦截wm_nchittest消息，使得当鼠标在窗口左边按下时，人为地将返回值设为htcaption，则系统将以为是在标题棒内，于是将可以移动窗口，完成了标题棒的功能，至于颜色和文字，则与消息无关，将在下面叙述其原理。
    .windows消息
    消息就是windows操作系统送往程序的事件。但事件数以百计，操作系统并沒有为各个事件设计不同的消息结构，而是以一个一般性的结构来来描述消息，这个结构在c++ builder中定义为tmessage。另外c++ builder对常见消息定义了专用结构，二者对等。可以直接将消息转换为专用结构，也可以自行解释tmessage参数。以wm_nchittest消息为例，它的定义如下：
    strUCt twmnchittest
    {
    cardinal msg;
    long unused;
    union
    {
    struct
    {

    windows::tsmallpoint pos;
    long result;
    };
    struct
    {
    short xpos;
    short ypos;
    };
    };
    };
    对照tmessage定义：
    struct tmessage
    {
    cardinal msg;
    union
    {
    struct
    {
    Word wparamlo;
    word wparamhi;
    word lparamlo;
    word lparamhi;
    word resultlo;
    word resulthi;
    };
    struct
    {
    long wparam;
    long lparam;
    long result;
    };
    };
    };
    可以发现，tmessage的lparam成员对应twmnchittest的pos成员，就是说以下两行语句
    等价：
    tpoint pt=tpoint(msg.lparam); //此时msg类型为tmessage
    tpoint pt=tpoint(msg.pos); //此时msg类型为twmnchittest
    .c++ builder处理消息的宏
    在c++ builder中自定义消息处理是较为方便的，结合wm_nchittest举例如下:
    在窗口类的protected部分加入如下宏定义：
    begin_message_map
    message_handler(wm_nchittest,tmessage,onnchittest)
    end_message_map(tform)
    message_handler包含3个参数：wm_nchittest，消息标识，也可以为自定义消息如wm_mymessage，这时只需加一个宏如#define wm_mymessage wm_app+1等；第二个参数tmessage代表消息类型，也可以为符合要求的自定义消息结构类型如tmymsg等，onnchittest为消息处理函数。这样，一旦有wm_nchittest消息传给tform，对该消息的响应就完全交由onnchittest函数处理。onnchittest函数只有一个参数，类型为message_handler中第2个参数的引用，即tmessage &或tmymsg &。
    .完成图一的窗口。
    开始一个新应用程序(new application)，将form1命名为vcform，对应单元文件为vcap.cpp，头文件为vcap.h。vcform的boarderstyle设置为bsnone，其上放置一个位图按钮bitBTn1，caption为&ok，kind为bkok，onclick事件处理函数中加入一句close()。然后在vcap.h的protected部分加入如前所述消息处理宏和函数onnchittest的声明，以处理标题条的拖动功能。为完成标题的着色和文字输出，双击vcform的onpaint事件以定制formpaint函数，具体代码见下面源码。此外为使窗口有立体感，重载虚函数createparams，以修改窗口的风格。完整的vcap.h和vcap.cpp如下：

        //vcap.h
        #ifndef vcaph
        #define vcaph
        #include
        #include
        #include
        #include
        #include
        class tvcform : public tform
        {
        __published: // ide-managed components
        tbitbtn *bitbtn1;
        void __fastcall formpaint(tobject *sender);
        void __fastcall bitbtn1click(tobject *sender);
        private: // user declarations
        protected:
        void __fastcall onnchittest(tmessage & msg);
        void __fastcall createparams(tcreateparams& params);
        begin_message_map
        message_handler(wm_nchittest,tmessage,onnchittest)
        end_message_map(tform)
        public: // user declarations
        __fastcall tvcform(tcomponent* owner);
        };
        extern package tvcform *vcform;
        #endif
        //vcap.cpp
        #include
        #pragma hdrstop
        #include "vcap.h"
        #pragma package(smart_init)
        #pragma resource "*.dfm"
        tvcform *vcform;
        __fastcall tvcform::tvcform(tcomponent* owner)
        : tform(owner)
        {
        }
        void __fastcall tvcform::formpaint(tobject *sender)
        {
        //绘制宽20的绿色标题条
        rect rc;
        setrect(&rc,0,0,clientwidth,clientheight);
        canvas->pen->color=clgreen;
        canvas->brush->color=clgreen;
        canvas->rectangle(0,0,20,clientheight);
        //输出旋转文字
        char* msg=caption.c_str();
        logfont fontrec;
        memset(&fontrec,0,sizeof(logfont));
        fontrec.lfheight = -13;
        fontrec.lfweight = fw_normal;
        fontrec.lfescapement = 900; //旋转角度900x0.1度=90度
        lstrcpy(fontrec.lffacename,"宋体");
        hfont hfont=createfontindirect(&fontrec);
        hfont hold=::selectobject(canvas->handle,hfont);
        ::setrect(&rc,0,0,20,clientheight);
        ::settextcolor(canvas->handle,rgb(255,255,255));

    ::textout(canvas->handle,3,clientheight-3,msg,lstrlen(msg));
    ::selectobject(canvas->handle,hold);
    ::deleteobject(hfont);
    }
    void __fastcall tvcform::bitbtn1click(tobject *sender)
    {
    close();
    }
    void __fastcall tvcform::onnchittest(tmessage & msg)
    {
    tpoint pt;
    pt.x=loword(msg.lparam);
    pt.y=hiword(msg.lparam);
    pt =screentoclient(pt);
    rect rc;
    setrect(&rc,0,0,20,clientheight);
    if (ptinrect(&rc,pt))
    msg.result = htcaption;
    else
    defaulthandler(&msg);
    }
    void __fastcall tvcform::createparams(controls::tcreateparams& params)
    {
    tform::createparams(params);
    params.style = ws_popup;
    params.style ^= ws_dlgframe;
    }
    vcform的消息处理已经介绍过，这里再对标题条的绘制作简要说明。由于c++builder的tfont没有定义文字旋转旋转的属性，因此用传统的sdk绘图方法。canvas->handle即是代表gdi绘图的hdc。
    3 制作对话框控件在开始制作控件之前，先将vcap.cpp中的#pragma package(smart_init)行注释掉。创建控件的步骤是：创建一个单元文件，在其中完成控件的类定义和注册，然后就可以安装了。控件类一般从某个现有类继承导出。制作控件与一般类定义的主要区别在于属性(property)和事件(event)，事件也是属性。由属性就带来了属性的存取方法、缺省值、属性编辑器等问题。为简单起见，本控件只涉及到上述一部分概念，但能涵盖控件制作的一般过程。
    .开始一个空控件
    由于要制作的对话框控件的最小必要功能是一个execute()方法，因此可以从tcomponent类继承。命名控件名为tvcaptiondlg，定义控件的单元文件命名为vcapdlg.cpp，其头文件为vcapdlg.h。用component wizard或手工方法完成如下文件：
    //vcapdlg.h
    #ifndef vcapdlgh
    #define vcapdlgh
    #include
    #include
    #include
    #include
    class package tvcaptiondlg: public tcomponent
    {
    private:
    protected:
    public:
    virtual __fastcall tvcaptiondlg(tcomponent    right">