C++ Builder中的自画功能(下)

（Continuing）
  好了，我们已经学会了在ComboBox和ListBox中通过自己的艺术细胞来自画列表项。那么我们自然就会想到：对于其他的控件，要是也能自己画就好了（哇，贪得无厌！）。于是，你满怀信息地去找帮助了……，但结果呢？不幸的很，大部分的控件既没有OwnerDraw方法，也没有Canvas属性。难道没有办法了吗？
  当然不！群众的创造力是无限的！我们总有办法来对付Windows的。下面，我就举个例子来说明怎样对任意的控件运用“自画”效果。
  记得那个官司满身的IE吗？IE 4.0的地址输入栏在你按回车之后，左侧会出现一个HTML的标志。我们也来做一个相似的效果，只不过我们可不想搞得那样精致。简单些，先画个蓝色的矩形方块吧！
  我们的计划是这样的，在一个Edit输入栏中，你可以输入任意内容，按回车之后，在前面加上一个蓝色矩形块。单击后，又回到输入状态。

  首先当然是先放上一个Edit啦。保持它的缺省属性设置。然后定义一个全局变量Editing用来标志是否处于输入状态，并将它初始化为true。再申明两个变量：
HDC hDC和 TCanvas *can;
  然后，在Edit的OnClick和OnChange事件中写上:
  Editing = true; //进入编辑状态
  Edit1->Refresh(); //刷新编辑框

  再然后，就进入了我们的重头戏：按回车之后自画编辑框，在文字前面画上一个矩形块：
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
  if ((Key == 13)&&(Editing))  //Key=13表示回车键
  {
    hDC = ::GetDC(Edit1->Handle);  //取得Edit1的DC(设备上下文，画图用的)
    can->Handle = hDC; //并把它连到一个canvas上，现在can就相当于Edit1的画布，可以随意作画。

    can->Brush->Color = clWhite;
    can->Brush->Style = bsSolid;
    can->FillRect(Rect(0, 0, Edit1->Width, Edit1->Height));    //先清除所有的内容

    can->Brush->Color = clBlue;
    can->FillRect(Rect(2, 2, 14, 14));  //画上一个蓝色矩形框

    can->Font->Color = clBlack;
    can->Brush->Style = bsClear;
    can->TextOut(16, 2, Edit1->Text);  //写上文字（Edit并不知道你会自己画，所以它不会自动调整内容，所以连原来的文字也要自己画一遍）

    Editing = false;
  }
}

    看出来了吗？用了Windows API函数之后，你可以补VCL的不足，做自己想做的一切事情。顺便说一句，所有的Windows窗口元素(具有窗口句柄的)都可以取到它的DC值。