void __fastcall TForm1::MyMenuDrawItem(TObject *Sender,TCanvas *ACanvas, const TRect &ARect, bool Selected)