难难难难..................高手请进

[夜雨悠扬]

如何把窗体的设置成红色，再线等待

[dealxl]

楼上的能不能给点具体的代码瞅瞅？？

[mygodness]

什么意思form不是有color属性吗？

[jishiping]

重定义虚拟函数WndProc，在WndProc你写代码：
void __fastcall TForm1::WndProc(TMessage& msg)
{
TForm::WndProc(msg);
if (msg.Msg==WM_NCPAINT) {
HDC hDC = GetWindowDC(Handle);
Canvas->Pen->Color = clRed;
Canvas->Brush->Style = bsClear;
SelectObject(hDC, Canvas->Pen->Handle);
SelectObject(hDC, Canvas->Brush->Handle);
Rectangle(hDC, 0, 0, Width, Height);
ReleaseDC(Handle, hDC);
}
}

[Behard]

void __fastcall TfrmMain::FormCreate(TObject *Sender)
{
//Image1 是一张很小的图片，这样能在 MDI 主窗体中画背景色
Brush->Bitmap=Image1->Picture->Bitmap;
}

[夜雨悠扬]

如何把窗体的边框设置成红色，再线等待

[dafei]

Shape1->Align=alClient;
form1->BorderStyle=bsNone;
可以用无边框窗体来实现

[bcb_fans]

把属性Color设置成clRed就可以了或者在FormCreate中调用如下代码
this->Color=clRed;

你不问这么简单的问题吧???,说得仔细一点.

[bcb_fans]

对不住，看错题目了。

截获WM_NCPAINT消息，然后自己画，不仅仅是红色，什么色都可以。

[夜雨悠扬]

jishiping(JSP 季世平) 谢了，你的代码果然好用！！