界面美化笔记

1、toolbar鼠标移上去出现的矩形框是通过在TCCToolButton.Paint方法中调用DrawBtnBorder实现的。

 

2、BitBlt方法我的理解是用于拷贝图像，可以以扩展图片的方式拷贝。

 

3、用windows api画边框：

var

  ll_Pen:   HPen;

 

        ll_Pen := CreatePen(ps_solid,   1,   clred);
        SelectObject(DC,   ll_Pen);
        SelectObject(DC,   GetStockObject(NULL_BRUSH)); //不需要填充（背景）
        Rectangle(DC, aRect.Left, aRect.Top, aRect.Right, aRect.Bottom);
        DeleteObject(ll_Pen);

 

4、更改brush的颜色：

SelectObject(DC, GetStockObject(DC_BRUSH));//必须执行这句，下一句才有用

        SetDCBrushColor(DC, Color);

 

5、想在edit上加一个按钮要用两个控件来实现才画得比较自然。