动态创建的菜单怎么去掉后面的默认出来的快捷键

动态创建菜单的代码如下，为什么菜单创建出来后面给自动添加了快捷键？比如说应该是【文件】，可动态创建出来却是【文件】(Z)怎么把后面的快捷键去掉，谁帮我看看下面的代码是不是少了什么，或者哪里不对，多谢了。procedure TForm1.Button1Click(Sender: TObject);
varaddSubItem:TMenuItem;
tempsubitem:TMenuItem;
i:Integer;
j:integer;beginQuery1.First;for i:=1 to  Query1.RecordCount do//beginaddSubItem:= TMenuItem.Create(Self);addSubItem.Name:= Query1.FieldByName('menuid').AsString;addSubItem.Caption := trim(Query1.FieldByName('caption').AsString); //addSubItem.MainMenu1.Items.Add(addSubItem);//addSubItem.OnClick:=MyClick;//Query1.Next;end;end;