TcomboBox下拉内容的背景颜色
如图,如何才能把下拉内容选择后的背景蓝颜色去掉, 选择完以后就是白色底那样
[解决办法]
加一句,改变边框线条颜色
void __fastcall TForm1::ComboBox1DrawItem(TWinControl *Control, int Index, TRect &Rect, TOwnerDrawState State){ TComboBox *cbb = (TComboBox *)Control; String strText = cbb->Items->Strings[Index]; cbb->Canvas->Brush->Color = clWhite; cbb->Canvas->FillRect(Rect); if(State.Contains(odSelected)) { if(State.Contains(odFocused)) ::DrawFocusRect(cbb->Canvas->Handle, &Rect); if( cbb->DroppedDown ) { cbb->Canvas->Pen->Color = clBlack; //边框线条颜色 cbb->Canvas->Brush->Color = RGB(49,106,197); cbb->Canvas->Rectangle(Rect.Left, Rect.Top, Rect.Right, Rect.Bottom); } else { cbb->Canvas->Pen->Color = clWhite; //边框线条颜色 cbb->Canvas->Brush->Color = clWhite; //背景色 你要的颜色 cbb->Canvas->Rectangle(Rect.Left, Rect.Top, Rect.Right, Rect.Bottom); } } cbb->Canvas->Font->Color = clBlack; cbb->Canvas->Brush->Style = bsClear; cbb->Canvas->TextOutA(Rect.Left + 2, Rect.Top , strText);