0

这是演示如何更改主菜单项的背景颜色的脚本,而菜单的其余部分仍保持灰色

 void __fastcall TForm1::AdvancedDrawNewItemMain(TObject *Sender, TCanvas *ACanvas,    const TRect &ARect,
      TOwnerDrawState State)
{

    TMenuItem *MenuItem = ((TMenuItem*)Sender);
    TRect  TempRctN = ARect;
    TempRectN.top=TempRctN.top+2;
    ACanvas->Brush->Color =clRed;
    ACanvas->FillRect(ARect);


    DrawTextW(ACanvas->Handle,MenuItem->Caption.w_str(),MenuItem->Caption.Length(),&TempRctN, DT_CENTER);


  if((State.Contains(odSelected) || State.Contains(odHotLight) ) && !State.Contains(odDisabled) )
  {
   ACanvas->Brush->Color =static_cast<TColor>RGB(49,106,197);
   ACanvas->FillRect(ARect);
   ACanvas->Font->Color=clWhite;
   DrawTextW(ACanvas->Handle,MenuItem->Caption.w_str(),MenuItem->Caption.Length(),&TempRctN, DT_CENTER);
  }

}

有人知道如何更改整个主菜单背景颜色吗?

4

1 回答 1

0

操作系统不支持您的要求。标准TMainMenu只能所有者绘制单个项目,而不是整个菜单。如果要自定义整个菜单,则必须使用不同的组件,例如找到支持所需内容的第三方自定义菜单实现。

于 2012-12-05T19:41:42.257 回答