anchor.diff:    inherited Create(AOwner);
     fpgApplication.OnException  := @MainFormException;
     OnShow  := @MainFormShow;
  +  OnDestroy :=@MainFormDestroy;
     Files := TList.Create;
     { TODO -oGraeme : Make Debug a menu option }
     Debug := False;
  
positive.code:     AddMenuItem('Open...', '', @miFileOpenClicked);
      AddMenuItem('Close', '', @miFileCloseClicked);
      AddMenuitem('-', '', nil);
      AddMenuItem('Quit', '', @miFileQuitClicked);
    end;
  
  
negative.code: implementation
  
  uses
    fpg_dialogs
    ,fpg_constants
    ,fpg_iniutils
    ,nvUtilities
    ,HelpTopic
    {$IFDEF Timing}
    ,EpikTimer
    {$ENDIF}
    ,TextSearchQuery
    ,SearchUnit
    ;
  
  
  {@VFD_NEWFORM_IMPL}
  