anchor.diff:    inc(CurrentHistoryIndex);
   end;
   
  -procedure TMainForm.ShowParamHelp;
  +procedure TMainForm.ShowCmdLineParamHelp;
   const
     le = LineEnding;
   var
  
positive.code:     SetPosition(292, 168, 132, 20);
      AddMenuItem('Contents...', '', nil);
      AddMenuItem('Help using help', '', nil);
      AddMenuItem('-', '', nil);
      AddMenuItem('About fpGUI Toolkit', '', @miHelpAboutFPGui);
      AddMenuItem('Product Information...', '', @miHelpProdInfoClicked);
    end;
  
  
negative.code:   begin
      if gCommandLineParams.IsParam('h') then
      begin
        ShowCmdLineParamHelp;
        Exit; //==>
      end
      else if gCommandLineParams.IsParam('debuglog') then
  