如何自动放大和缩小菜单的字体和图标

Question

各位大侠：
    你们好，我用mainmenu控件做了一个主菜单，菜单在设计的时侯字体和图标都很小，很不美观，我试着改变菜单字体和图标的大小，但不成功，望各位大侠帮忙。
                                           王振亚
                                       2003.08.06

Answer 1

真不知你要干什么用
procedure TForm1.aaaaDrawItem(Sender: TObject; ACanvas: TCanvas;
  ARect: TRect; Selected: Boolean);
beginend;procedure TForm1.aaaa1MeasureItem(Sender: TObject; ACanvas: TCanvas;
  var Width, Height: Integer);
beginend;