anchor.diff:      Name := 'miFile';
       SetPosition(292, 28, 132, 20);
       AddMenuItem('Open...', '', @miFileOpenClicked);
  +    AddMenuItem('Save current Topic to IPF...', '', @miFileSaveTopicAsIPF);
       AddMenuItem('Close', '', @miFileCloseClicked);
       AddMenuitem('-', '', nil);
       FFileOpenRecent := AddMenuItem('Open Recent...', '', nil);
  
positive.code:   DisplayTopic;
  end;
  
  procedure TMainForm.miMRUClick(Sender: TObject; const FileName: String);
  begin
    OpenFile(FileName, '', True);
  
negative.code:     procedure   miHelpAboutFPGui(Sender: TObject);
      procedure   miDebugHeader(Sender: TObject);
      procedure   miDebugHex(Sender: TObject);
      procedure   miFileSaveTopicAsIPF(Sender: TObject);
      procedure   miMRUClick(Sender: TObject; const FileName: String);
      procedure   btnShowIndex(Sender: TObject);
      procedure   btnGoClicked(Sender: TObject);
  