>>118
ほら
var
NewItem1, NewItem2, Menu1 : TMenuItem;

って自分でローカル変数として定義してるじゃないの。
　たぶん TForm1のメンバにもMenu1があってそっちを参照するつもりだったんでしょ？